Help for this page

Select Code to Download


  1. or download this
    [00:28][nick:~/monks]$ cat 1139778.txt
foo
bar
baz
qux
  2. or download this
    #!/usr/bin/perl
use strict;
...
close $MYFILE or die "Failed to close $file: $!\n";

__END__
  3. or download this
    [00:29][nick:~/monks]$ perl 1139778.pl
Using $data:
...
bar
baz
qux