On Mon, Dec 13, 2010 at 10:47:01AM +0100, demerphq wrote: > The whole idea is to have a non-refcount incremented identifier that > resolves to a reference to the currently executing subroutine. use CPS qw( kwhile ); kwhile( sub { my ( $knext ) = @_; ..... $knext->() } ); HTH, -- Paul "LeoNerd" Evans leonerd@leonerd.org.uk ICQ# 4135350 | Registered Linux# 179460 http://www.leonerd.org.uk/Thread Previous | Thread Next