in reply to Re^5: bad die behaviour?
in thread bad die behaviour?

No I don't have any signal handler defined. I also tried to print the whole %SIG hash just before the die, to see if any module had set any signal handler that I wasn't aware of, and the only signal handler active was the floating point exception handler.
thanks
Xavi

Replies are listed 'Best First'.
Re^7: bad die behaviour?
by nimdokk (Vicar) on Sep 10, 2007 at 13:58 UTC
    You might want to consider using $SIG{__DIE__} instead of the FatalError subroutine. Put what you are doing in the FatalError into the subroutine for the DIE signal handler, evaluate $? (instead of $!) before die'ing.

    Something like:

    $SIG{__DIE__}=sub{
                  print STDERR "I'm Dyin!: \n";
                 };

some_command;
$error_code=$?>>8;
print "Finished running some_command";
die if $error_code > 0;

    [download]
[reply]
[d/l]

In Section Seekers of Perl Wisdom