$SIG{__DIE__} = sub
{
print "Exception: ".$_[0]."n";
print "My Exception Handlernnn";
};
die("REASON");
$SIG{__DIE__} = sub
{
print "Exception: ".$_[0]."n";
print "My Exception Handlernnn";
};
die("REASON");
Receive the latest blog posts direct in your mailbox
