Help for this page

Select Code to Download


  1. or download this
    @ARGV = glob '/export/home/date_file*';
    
  2. or download this
    while ( my $line = <> ) {
    
  3. or download this
    #!/usr/bin/perl
    use warnings;
    ...
    }
    
    print "Total     \t: $sum\n";