Re: Strange output problem



Peter J. Holzer wrote:
sub html_escape {
my $s = @_;
$s =~ s/&/&/;
$s =~ s/</&lt;/;
$s =~ s/>/&gt;/; # only for symmetry
$s =~ s/"/&dquot;/; # only needed in attributes
$s =~ s/'/&apos;/; # only needed in attributes
return $s;
}

use CGI qw{ escapeHTML };

-jp

.