- or download this
#!/usr/bin/perl
...
use Foo;
die('this will appear in the error log like expected');
- or download this
#!/usr/bin/perl
...
my $foo = Foo->new();
die('this will NOT appear in the error log at all');
- or download this
#!/usr/bin/perl
...
undef $foo;
die('this DOES appear in the error log');
- or download this
local $SIG{__DIE__} = ''; # no effect
local $SIG{__DIE__} = 'DEFAULT'; # no effect
...
# this has no effect, nothing at all in the logs:
local $SIG{__DIE__} = sub { die @_ };
- or download this
die SOAP::Fault->new(..);