You can override the global __DIE__ handler something like (untested):

use Carp;
$SIG{ __DIE__ } = sub { Carp::confess( @_ ) };
[download]

See perlvar for more info on %SIG.