Select Code to Download

#!/usr/bin/perl --

...
        Global symbol "$bar" requires explicit package name at test.pl
+ line 12.
Execution of test.pl aborted due to compilation errors.
 at test.pl line 13

my $foo = 1;
...
}# end of new scope

my $baz = $bar;