Help for this page

Select Code to Download

Select or download this

local $SIG{__DIE__} = sub { die "[".gmtime." UTC] (PID $$) FATAL ".shi
+ft };
# - OR - #
...
}
# - OR - #
local $SIG{__DIE__} = sub { chomp(my $m = shift); syslog('err','Error:
+ %s',$m) };