Select Code to Download

$SIG{__DIE__}= sub {warn "\$SIG{__DIE__} handles: $_[0]"; };         

...

warn "--- top level die\n";
die "OUTER SCOPE\n";

--- normal eval
$SIG{__DIE__} handles: EVAL
...
OUTER SCOPE

Compilation exited abnormally with code 255 at Thu Jun 12 03:33:59