One wonders if: $SIG{__DIE__} = sub { die $_[0] unless defined $^S; $poe_kernel->yield('_die'); };
would work. /me goes off to test.
One wonders if: $SIG{__DIE__} = sub { die $_[0] unless defined $^S; $poe_kernel->yield('_die'); };
would work. /me goes off to test.