The trick is to not use die(), and excise it from the code. Use your own subroutine (with its own name) and do whatever you like. People know to expect something different when they see a user defined subroutine name, but they most always expected documented behaviour when they see a Perl built-in.