Heh...if you used -w, you would have caught this.

$ 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.
[download]

Sorry...couldn't resist.