Select Code to Download

$ perl -v | perl -lane 'print "@F[-2, -1]" if /Copyright/'
Larry Wall
...
$ mail
Mail version 8.1.2 01/15/2001.  Type ? for help.
"/var/mail/james": 5469 messages 1266 new 5469 unread

$ perl goedel.pl                                                  
Use of uninitialized value in say at goedel.pl line 7.

...

1
$

#!/usr/bin/perl

use warnings;
...