Help for this page

Select Code to Download

Select or download this

 open my $hfile, $ARGV[0] or die "Can't open $ARGV[0] for reading: $!"
+;
while( my $line = <$hfile> )
...
    print $line;
}
close $hfile;