Help for this page

Select Code to Download


  1. or download this
    my $file = $ARGV[0];
  2. or download this
    my $file = shift @ARGV;
  3. or download this
    while(<>) { }