4314
4331
…
[EOF]

のようにデータの入ったファイルからリダイレクトで標準入力
からデータを入力するときに、EOFも取り込まれてしまうの
ですが、取り込まれないようにする方法はありますでしょう
か？今は以下のように、わざわざ配列からpopしてEOFを
捨てています。

@a = <STDIN>;
chomp(@a);
pop @a;