$SIG{'__DIE__'} = \&my_die_handler;

##</code><code>##

eval {
  local $SIG{'__DIE__'} = 'DEFAULT';
  $dbh->nsql;
}