my $rv;
if (!eval { $rv = $doomsday_weapon->$method(@args); 1 }) {
   die("Doomsday weapon failed: $@\n");
}