Help for this page

Select Code to Download


  1. or download this
    my @lines = <$filehandle>;   # read all lines
    s/\s+$// for @lines;         # remove any whitespace at the end of eac
    +h line.