P:\test>echo "" | perl -wle "<>; warn 'Erk!'"
Erk! at -e line 1, <> line 1.

P:\test>echo "" | perl -wle "<>; close ARGV; warn 'Erk!'"
Erk! at -e line 1.