Help for this page
use Data::Dumper; foo(); ... $args[3]->{a}++; # 1 -> 2 in z $args[4]->{a}++; # 1 -> 2 in zz }
$x = 4; warn $x; ... sub blah { $_[0] += 3; }