Help for this page
my %subst = map { chr($_) => qq|&#$_;|} 0..255;
my $TXT = <<EOM; Those oranges are 50¢ ... #ARGH! return $word; }###########################
Those oranges are 50¢