perl -wE'eval "1+1; 1"; eval "\n; 1+1; 2"'
Useless use of a constant (2) in void context at (eval 1) line 1.
Useless use of a constant (2) in void context at (eval 2) line 2.

##</code><code>##

Useless use of a constant (2) in void context at (validator code for X generated by Foo/Bar.pm line 234) line 1.
Useless use of a constant (2) in void context at (validator code for Y generated by Foo/Baz.pm line 99) line 2.