try {
    die "foobar\n";
    print "OK";
} catch {
    print "FAILED!\n";
};