ちょっと疑問

ファイルの各行を配列の要素として読み込ませるコードって

open(FP,"+<$file");
@xx = <FP>;
foreach $yy (@xx) {
print $yy;
}
close(IN);

って書くらしいんだけど、
foreach $yy (@xx) {
print $yy;
}
これって意味あんの？