Help for this page

Select Code to Download


  1. or download this
    while (<$fh>) {
    
  2. or download this
        s/\s+/ /g;
    
  3. or download this
        s/$\s//;
    
  4. or download this
        print lc;
    }
    
  5. or download this
    my $linecount = $. ;