If I have Perl module like
package X;
and an object like
my $x = X->new ();
Inside X.pm, I
You could use Continuation::Escape. This would basically allow you to pass the "point-of-return" on to the error handler.