$ perl -wle '"a" == 0 && print "yes"'
Argument "a" isn't numeric in numeric eq (==) at -e line 1.
yes