Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
    
    ...
    use Foo;
    
    die('this will appear in the error log like expected');
    
  2. or download this
    #!/usr/bin/perl
    
    ...
    my $foo = Foo->new();
    
    die('this will NOT appear in the error log at all');
    
  3. or download this
    #!/usr/bin/perl
    
    ...
    undef $foo;
    
    die('this DOES appear in the error log');
    
  4. 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 @_ };
    
  5. or download this
    die SOAP::Fault->new(..);