# perl -lwE'for (reverse 0..2) { our $foo; local *foo; $foo=$_ if $_==1; print $foo // "undef"; }' undef 1 undef
# perl -lwE'for (reverse 0..2) { our $foo; # local *foo; $foo=$_ if $_==1; print $foo // "undef"; }' undef 1 1
In reply to Re: pointer/alias question
by Anonymous Monk
in thread pointer/alias question
by shoness
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |