$ perl -wew 'if (undef() eq undef()) {print "true" }else{ print "false"}'
Unquoted string "w" may clash with future reserved word at -e line 1.
Useless use of a constant in void context at -e line 1.