Help for this page
$SIG{'__DIE__'} = \&my_die_handler;
eval { local $SIG{'__DIE__'} = 'DEFAULT'; $dbh->nsql; }