Suppressing Warnings (2)

• A "Perl 7-ish" program that assumes strict and warnings on by default

        $ cat foo7.pl 
        my ($i, $j, $k);
        $i = 'foo';
        $k = $i . $j;
        print "$k\n";

continued...