Hi ,
I have this in my code :
local $SIG{__DIE__} = \&die_handler;
and then
sub die_handler {
my (@vars)=@_;
print STDERR "\nfirst : " . $vars[0];
print STDERR "\nsecond : " . $vars[1];
}
if i give :
die ('goo','foo','bar');
Then I get the output :
first : goofoobar at out.pl line 233.
second :
I want to have the three arguments in an array.
can somebody tell what am I doing wrong ?
Thanks
Pradeep
_________________________________________________________________
Join the world’s largest e-mail service with MSN Hotmail.
http://www.hotmail.com
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
