Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -l
    
    ...
      map { chomp(my $line=<$_>); $line } @fh,
    
    __END__