Actually, my goal was to define a wrapper function that could never die(), even if the inner function did and expose this new interface to the user.

The advantage of using 'goto' would have been that the caller level in the inner function would have been unchanged, but I worked around the Perl limitation of not offering goto &NAME with eval {} by adding some code to adapt the caller level manually at the application level.

Thanks, all!