Help for this page

Select Code to Download


  1. or download this
    if( -t and !@ARGV) {
        die "Need a file or stream on standard input";
    ...
    while (<>) {
        ...
    };
    
  2. or download this
    >perl -w tmp.pl
    Need a file or stream on standard input at tmp.pl line 2.
    ...
    >perl -w tmp.pl tmp.pl
    
    >perl -w tmp.pl <tmp.pl