Help for this page

Select Code to Download

Select or download this

open (FH,"<", $_); 
# to
open (FH,"<:encoding(latin1)", $_);

Select or download this

#!/usr/bin/perl 
use warnings;
...
#  text is only in the mouse clipboard buffer.
__END__