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.