$ perl -wE 'say for 1, undef, 3'
1
Use of uninitialized value in say at -e line 1.

3