Help for this page

Select Code to Download

Select or download this

local $SIG{__DIE__} = \&foo;
                                                                      
+          
...
   print "COpped die";
   
}