{ my (@arr, $elt); for (@arr=(0..2); ($elt, @arr) = @arr; print "Continue $elt\n" if @ +arr) { print "Iteration $elt\n"; } }
In reply to Re: I need a different continue
by Roy Johnson
in thread I need a different continue
by DrWhy
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |