Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

Re: Fun with $SIG{__DIE__}

by plaid (Chaplain)
on Jul 08, 2000 at 00:45 UTC ( #21574=note: print w/ replies, xml ) Need Help??


in reply to Fun with $SIG{__DIE__}

From Programming Perl:

The routine indicated by $SIG{__DIE__} is called when a fatal exception is about to be thrown. The error message is passed as the first argument.
So you probably want something like:
$SIG{__DIE__}=sub {print LOG "Script Died: $_[0]" and close LOG if DEB +UGING};


Comment on Re: Fun with $SIG{__DIE__}
Select or Download Code
RE: Re: Fun with $SIG{__DIE__}
by Adam (Vicar) on Jul 08, 2000 at 00:54 UTC
    That works. I guess I should RTFM more closely. :) Thanks.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://21574]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (8)
As of 2014-11-29 03:41 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My preferred Perl binaries come from:














    Results (203 votes), past polls