Perlでファイルを読み込んで表示させる

Perlで外部ファイルを読み込ませて表示させるときに使える。

配列でなくて変数に一気に読み込むなら（多分この方が早いしメモリ消費も少ない）

#一気に変数に入れる

open(IN, "< filename");
read (IN, $buf, (-s "filename"));
print $buf;
close IN;

ファイルが巨大で、メモリに全部読み込むのが嫌なら

open(IN, "< filename");
while(){
print $_;
}
close IN;