#!/usr/local/bin/perl
eval 'exec /usr/local/bin/perl -S $0 ${1+"$@"}'
	if $running_under_some_shell;

# Copyright information:
#
# Copyright (c) 1995--1996 Philippe Deschamp <Philippe.Deschamp@INRIA.Fr>
#
#    Permission is granted to anyone to make or distribute verbatim
#    copies of this document as received, in any medium, provided
#    that the copyright notice and this permission notice are
#    preserved, thus giving the recipient permission to redistribute
#    in turn.
#
#    Permission is granted to distribute modified versions of this
#    document, or of portions of it, under the above conditions,
#    provided also that they carry prominent notices stating who last
#    changed them.

while (<>) {
    s/ /\&nbsp;/g;         s/À/\&Agrave;/g;       s/à/\&agrave;/g;
    s/¡/\&iexcl;/g;        s/Á/\&Aacute;/g;       s/á/\&aacute;/g;
    s/¢/\&cent;/g;         s/Â/\&Acirc;/g;        s/â/\&acirc;/g;
    s/£/\&pound;/g;        s/Ã/\&Atilde;/g;       s/ã/\&atilde;/g;
    s/¤/\&curren;/g;       s/Ä/\&Auml;/g;         s/ä/\&auml;/g;
    s/¥/\&yen;/g;          s/Å/\&Aring;/g;        s/å/\&aring;/g;
    s/¦/\&brvbar;/g;       s/Æ/\&AElig;/g;        s/æ/\&aelig;/g;
    s/§/\&sect;/g;         s/Ç/\&Ccedil;/g;       s/ç/\&ccedil;/g;
    s/¨/\&uml;/g;          s/È/\&Egrave;/g;       s/è/\&egrave;/g;
    s/©/\&copy;/g;         s/É/\&Eacute;/g;       s/é/\&eacute;/g;
    s/ª/\&ordf;/g;         s/Ê/\&Ecirc;/g;        s/ê/\&ecirc;/g;
    s/«/\&laquo;/g;        s/Ë/\&Euml;/g;         s/ë/\&euml;/g;
    s/¬/\&not;/g;          s/Ì/\&Igrave;/g;       s/ì/\&igrave;/g;
    s/­/\&shy;/g;          s/Í/\&Iacute;/g;       s/í/\&iacute;/g;
    s/®/\&reg;/g;          s/Î/\&Icirc;/g;        s/î/\&icirc;/g;
    s/¯/\&macr;/g;         s/Ï/\&Iuml;/g;         s/ï/\&iuml;/g;
    s/°/\&deg;/g;          s/Ð/\&ETH;/g;          s/ð/\&eth;/g;
    s/±/\&plusmn;/g;       s/Ñ/\&Ntilde;/g;       s/ñ/\&ntilde;/g;
    s/²/\&sup2;/g;         s/Ò/\&Ograve;/g;       s/ò/\&ograve;/g;
    s/³/\&sup3;/g;         s/Ó/\&Oacute;/g;       s/ó/\&oacute;/g;
    s/´/\&acute;/g;        s/Ô/\&Ocirc;/g;        s/ô/\&ocirc;/g;
    s/µ/\&micro;/g;        s/Õ/\&Otilde;/g;       s/õ/\&otilde;/g;
    s/¶/\&para;/g;         s/Ö/\&Ouml;/g;         s/ö/\&ouml;/g;
    s/·/\&middot;/g;       s/×/\&times;/g;        s/÷/\&divide;/g;
    s/¸/\&cedil;/g;        s/Ø/\&Oslash;/g;       s/ø/\&oslash;/g;
    s/¹/\&sup1;/g;         s/Ù/\&Ugrave;/g;       s/ù/\&ugrave;/g;
    s/º/\&ordm;/g;         s/Ú/\&Uacute;/g;       s/ú/\&uacute;/g;
    s/»/\&raquo;/g;        s/Û/\&Ucirc;/g;        s/û/\&ucirc;/g;
    s/¼/\&frac14;/g;       s/Ü/\&Uuml;/g;         s/ü/\&uuml;/g;
    s/½/\&frac12;/g;       s/Ý/\&Yacute;/g;       s/ý/\&yacute;/g;
    s/¾/\&frac34;/g;       s/Þ/\&THORN;/g;        s/þ/\&thorn;/g;
    s/¿/\&iquest;/g;       s/ß/\&szlig;/g;        s/ÿ/\&yuml;/g;
    print;
}