Select Code to Download

$f = eval { loadPari($meth) };
return $f if defined $f;
return;

$SIG{__DIE__} = sub {
  # propagate the die if we're under an eval
  (defined($^S) && !$^S) or die(@_);
  # now do the real stuff
  ...
};