7stud (++) is technically correct and the quote cited is worth noting, but beware:

Your mileage will vary if you use warnings; if you make lines 2 and 5 into print lines, and even if you attempt to run ("test") lines 4 and 5 as a one-liner.

The last is merely cosmetic;

>perl -e "$result = undef; $result or die 'I am dead down here.';"
I am dead down here. at -e line 1.
[download]

but the other two variants invoke (or illustrate) something quite different than that about which OP appears to have asked.