in reply to Perl logical operators
See also Truth and Falsehood in perlsyn for more on truthyness in Perl.
Give a man a fish: <%-{-{-{-<