Subject: | archive-tar does not work with SIG DIE handlers |
Date: | Thu, 30 Dec 2010 17:19:33 +0300 |
To: | bug-Archive-Tar [...] rt.cpan.org |
From: | Victor <victor [...] vsespb.ru> |
hello.
any simple code like
my $a = Archive::Tar->new( "a.tgz", 1);
does not work if the following used:
$SIG{__DIE__} = sub { for my $s (0..$#_) { mylogfunc("Fatal Error:
$_[$s]"); }; print $UnhandledError; exit(1); };
$SIG{__WARN__} = sub { for my $s (0..$#_) { mylogfunc("Warning: $_[$s]"); } };
btw
never experienced problem with such SIG DIE handlers + modules for
last five years.