3 ms·

Here is an interesting perl6 example which works in Rakudo: $ perl6 > $PERL<name>; rakudo > $PERL<compiler><ver>; 2014.03.01 > { CONTROL { pri

Here is an interesting perl6 example which works in Rakudo: $ perl6 > $*PERL<name>; rakudo > $*PERL<compiler><ver>; 2014.03.01 > { CONTROL { print 1; $_.resume }; print 2; warn; say 3 } 213 ref: https://news.ycombinator.com/item?id=7192294 https://news.ycombinator.com/item?id=7192294 For a perl5 Condition System see this implementation - https://metacpan.org/pod/ConditionSystem https://metacpan.org/pod/ConditionSystem

mst 12y ago
That one's still exception based. You wanted http://p3rl.org/Worlogog::Incident http://p3rl.org/Worlogog::Incident http://p3rl.org/Worlogog::Restart http://p3rl.org/Worlogog::Restart which uses Return::MultiLevel to do stack unwinds that can pass through try/catch constructs.