Help for this page
sub A { local $x = 3; ... my $x = 2; print &A; #prints 3 not 2
sub A { $x = 3; ... my $x = 2; print &A;