Help for this page

Select Code to Download

Select or download this

# foo.pl - print a file in reverse

...
for my $line (@lines) {
    print $line;
}

Select or download this

$ perl foo.pl foo.pl

...
use strict;

# foo.pl - print a file in reverse