Select Code to Download

use warnings;
use strict;
...
sub printFoo {
    print "\$foo = $foo\n";
}

"my" variable $foo masks earlier declaration in same scope at noname.p
+l line 8.
Use of uninitialized value in concatenation (.) or string at noname.pl
+ line 14.
$foo = 
$foo = 2