1 files changed, 72 insertions, 0 deletions
diff --git a/share/examples/vim/sgml2accents.pl b/share/examples/vim/sgml2accents.pl
new file mode 100755
index 0000000000..d08d5209c9
--- /dev/null
+++ b/share/examples/vim/sgml2accents.pl
@@ -0,0 +1,72 @@
+#!/usr/bin/perl
+# $FreeBSD$
+# Transform SGML notation in Iso-8859-1 accents
+while (<>) {
+s/&Agrave;/�/g;
+s/&Aacute;/�/g;
+s/&Acirc;/�/g;
+s/&Atilde;/�/g;
+s/&Auml;/�/g;
+s/&Aring;/�/g;
+s/&Aring;/�/g;
+s/&AElig;/�/g;
+s/&Ccedil;/�/g;
+s/&Egrave'/�/g;
+s/&Eacute;/�/g;
+s/&Ecirc;/�/g;
+s/&Euml;/�/g;
+s/&Igrave;/�/g;
+s/&Iacute;/�/g;
+s/&Icirc;/�/g;
+s/&Iuml;/�/g;
+s/&ETH;/�/g;
+s/&Ntilde;/�/g;
+s/&Ograve;/�/g;
+s/&Oacute;/�/g;
+s/&Ocirc;/�/g;
+s/&Otilde;/�/g;
+s/&Ouml;/�/g;
+s/&times;/�/g;
+s/&Oslash;/�/g;
+s/&Ugrave;/�/g;
+s/&Uacute;/�/g;
+s/&Ucirc;/�/g;
+s/&Uuml;/�/g;
+s/&Yacute;/�/g;
+s/&THORN;/�/g;
+s/&szlig;/�/g;
+s/&agrave;/�/g;
+s/&aacute;/�/g;
+s/&acirc;/�/g;
+s/&atilde;/�/g;
+s/&auml;/�/g;
+s/&aring;/�/g;
+s/&aring;/�/g;
+s/&aelig;/�/g;
+s/&ccedil;/�/g;
+s/&egrave;/�/g;
+s/&eacute;/�/g;
+s/&ecirc;/�/g;
+s/&euml;/�/g;
+s/&igrave;/�/g;
+s/&iacute;/�/g;
+s/&icirc;/�/g;
+s/&iuml;/�/g;
+s/&eth;/�/g;
+s/&ntilde;/�/g;
+s/&ograve;/�/g;
+s/&oacute;/�/g;
+s/&ocirc;/�/g;
+s/&otilde;/�/g;
+s/&ouml;/�/g;
+s/&divide;/�/g;
+s/&oslash;/�/g;
+s/&ugrave;/�/g;
+s/&uacute;/�/g;
+s/&ucirc;/�/g;
+s/&uuml;/�/g;
+s/&yacute;/�/g;
+s/&thorn;/�/g;
+s/&yuml;/�/g;
+print;
+}