Select Code to Download

sub foo
{ # begin lexical scope
...
sub bar {
   print "\$x in bar() is: ", (defined $x ? $x : "undefined"), $/;
}