try { die "screaming"; } catch { /screaming/ and print "Stop screaming.\n"; };