eval {
  ...
  die "Hi!";
};
print "cheated death!\n";