Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things

Re: Exceptions vs Context Objects

by educated_foo (Vicar)
on Mar 31, 2006 at 18:17 UTC ( #540522=note: print w/ replies, xml ) Need Help??

in reply to Exceptions vs Context Objects

This looks like a perfect place for the under-appreciated nonlocal loop control operators, e.g.:

@sources = ( { pre => [sub { print 1; }, sub { print 2; last pre; }, sub { prin +t 3 }], post => [sub { print 4; }, sub { print 5; last source }] }, { pre => [sub { print "badness" }] } ); source: for (@sources) { pre: for (@{$_->{pre}}) { $_->(); } post: for (@{$_->{post}}) { $_->(); } } __END__ 1 2 4 5
Document a good set of labels, and your module will be both convenient to use and educational about Perl's dark corners.

Comment on Re: Exceptions vs Context Objects
Download Code

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://540522]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (4)
As of 2015-11-29 03:59 GMT
Find Nodes?
    Voting Booth?

    What would be the most significant thing to happen if a rope (or wire) tied the Earth and the Moon together?

    Results (746 votes), past polls