% perl -wle 'print 1 if "" == 0' Argument "" isn't numeric in numeric eq (==) at -e line 1. 1