sub sub_that_may_die() {
    die "Oops!" if something_I_do_not_like_happens;
}
eval {sub_that_may_die()}