OK:
NOT OKmy $foo = 1; BLOCK: { last if $foo > 10; eval { print $foo++, "\n"; }; redo; }
my $foo = 1; eval { last if $foo > 10; print $foo++, "\n"; redo; }
In reply to Re: redo question ( part 'catching segfaults' )
by rjbs
in thread redo question ( part 'catching segfaults' )
by geektron
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |