until ($sig) {
print "running...\n";
sleep 1;
}
_
From: Rajnikant [mailto:[EMAIL PROTECTED]
Sent: Wednesday, July 09, 2008 6:37 PM
To: 'Perl Beginners'
Subject: FW: Signal Handlers
Can someone confirm whether you people getting my mails or not?
If
Can someone confirm whether you people getting my mails or not?
If yes, please commment on following code
_
From: Rajnikant [mailto:[EMAIL PROTECTED]
Sent: Tuesday, July 08, 2008 6:49 PM
To: 'Perl Beginners'
Subject: FW: Signal Handlers
Hello all,
I want to catch SIGS
{
print "running...\n";
sleep 1;
}
_
From: Rajnikant [mailto:[EMAIL PROTECTED]
Sent: Tuesday, July 08, 2008 1:15 PM
To: 'Perl Beginners'
Subject: Signal Handlers
Hello Gurus,
I'm using following code snipet to catch SIGSEV signal.
local $SIG{SEGV} = \&seg_ha
Hello Gurus,
I'm using following code snipet to catch SIGSEV signal.
local $SIG{SEGV} = \&seg_handler;
sub seg_handler
{
my $sig = shift;
print "seg_handler :: Caught $sig \n";
}
while (1)
{
print ("Still alive \n");
sleep 1;
}
When I send SEGV signal to this process (kill