Hello all,
 
This is my first time into trying to deal with SIGALARMS, mostly due to the fact that this is the first time I'm getting applications dieing out with a message :
 
"Terminating on signal SIGALARM(14)"
 
I did a dump of what is held in the %SIG and 14 is undef.
 
I'm not sure what is causing the alarm to fire, it's not happening under the same conditions.  Another words, I cannot do x, y and z and always cause SIGALARM(14) to fire.
 
I tried to trap the signal, but didn't seem to handle it at all...
 
$SIG{14} = 'SigHandler14'; # also tried $SIG{'14'} no luck there either
sub SigHandler14 {
    local($sig) = @_;
    print "\nCaught SIG$sig.";
    exit(1);
}
 
trying to use:
$SIG{'14'} or $SIG{14} = 'IGNORE';
 
tells me that "No such signal: SIG14"
 
if I place this above where I: use strict; no problems, but if I place it below, I get complaints about $SIG not being defined...how do I use strict and still have access to %SIG?
 
I've read the man pages but not sure how to proceed if no such signal, but yet I'm terminating on it under differing situations.
 
I'm on a Win XP Pro OS, Perl 5.8.0 (multi-thread) Build 806 by ActiveState.
 
TIA
 
JY

Reply via email to