Help for this page

Select Code to Download

Select or download this

&$code;  # call the wrapped sub
if (CODE DIED) {
  # do something about that and let the die() happen
} else {
  # do something else
}

Select or download this

eval { &$code; };  # call the wrapped sub
if ($@) {
  # do something about that and let the die() happen
} else {
  # do something else
}