in reply to Expanded death option(s)?

Override die (*CORE::GLOBAL::die = \&mydie), then use caller to root around in the stack.