Re: die handler : posting again.

On Mar 1, Sethi, Pradeep said:

>I have this in my code :
>
>local $SIG{__DIE__} = \&die_handler;
>
>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.

Sorry, but the arguments to die() are concatenated.  I don't think there's
a workaround, apart from writing your own function to use instead of
die().

-- 
Jeff "japhy" Pinyan      japhy@pobox.com      http://www.pobox.com/~japhy/
RPI Acacia brother #734   http://www.perlmonks.org/   http://www.cpan.org/
** Look for "Regular Expressions in Perl" published by Manning, in 2002 **
<stu> what does y/// stand for?  <tenderpuss> why, yansliterate of course.
[  I'm looking for programming work.  If you like my work, let me know.  ]

• die handler : posting again. by Sethi, Pradeep
• Re: die handler : posting again. by Jeff 'japhy' Pinyan
• Re: die handler : posting again. by Tanton Gibbs
• Re: die handler : posting again. by Tanton Gibbs