in reply to Safer (and cleaner) way to print user-supplied text.
my $bad = {
'&' => '&',
'|' => '&pipe;', # I don't know this one :-)
';' => ';', # This one either
};
my $find = join '', keys %{$bad};
$string =~ s/([$find])/$bad->{$1}/g;
Enjoy
-- Casey
|
|---|