Help for this page

Select Code to Download

Select or download this

$SIG{__DIE__} = sub {
                      if (! $^S )
...
                         # came from inside an eval
                      }
                    };