Help for this page
my $in; my $open_mode = '<:raw'; ... } $open_mode .= ':utf8'; open my $in, $open_mode, $filename or die "Can't read $filename: $ +!\n";
my $in; if ($filename=~/\.gz$/) { ... open $in, '<:raw', $filename or die "Can't read $filename: $!\ +n"; }; binmode $in, ':utf8';
www.com | www.net | www.org
No recent polls found