package Devel::Recreate; require Other::World; BEGIN { require Control; Control->stop ($_) for split /$interface/, $ENV{Computers}; UNIVERSAL::DESTROY(Control->get('worries')); unimport Telephone; Control->loose; } sub relax { my $self = shift; $self->forget('work'); $self->enjoy($self->peer->reflect); $self->inspect('hobbies'); Other::World->get_callback($self); goto $self->callback; # magic goto, doesn't return, at least not to here... } return relax(caller);