【Perl 】初心者コーナーPart5

開いたファイルに毎行処理を行うには

while (<FILE>) { 処理 };
と
foreach (<FILE>) { 処理 };

ではどちらが速いでしょうか？
また、一度配列に入れてからのほうが良いのでしょうか？
教えてください。