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 -11 proc_id) from command
promt, I'm able to catch this signal.
I need to call default SEGV signal handler after my processing.
How should I code for this?
Thanks in advance.
DISCLAIMER
==========
This e-mail may contain privileged and confidential information which is the
property of Persistent Systems Ltd. It is intended only for the use of the
individual or entity to which it is addressed. If you are not the intended
recipient, you are not authorized to read, retain, copy, print, distribute or
use this message. If you have received this communication in error, please
notify the sender and delete all copies of this message. Persistent Systems
Ltd. does not accept any liability for virus infected mails.
