Re: [FWP] awww, no fun :(

[Rick Delaney <rick.delaney@home.com>]

Jeff Pinyan wrote:
> 
> >   eval { { $loop->(); redo } };
> >
> >> }
> 
> Wow.  Thanks, Rick.  That's really quite simple, but ingenious.

*blush*

You can even do other kinds of control flow if you customize your die
messages.

    {
        eval { $code->() }
        redo unless $@;
        next if $@ eq "NEXT\n";
        last if $@ eq "LAST\n";
        die $@;
    }

-- 
Rick Delaney
rick.delaney@home.com

==== Want to unsubscribe from Fun With Perl?  Well, if you insist...
==== Send email to <fwp-request@technofile.org> with message _body_
====   unsubscribe