Help for this page
sub main { foo(my $x = 1); say $x; ... sub foo { say ++$_[0] . ' in foo'; }
sub main { bar(my $x); say $x; ... sub bar { $_[0] = 'assigned in bar'; }
www.com | www.net | www.org
No recent polls found