Perlでファイルに書き込む

Perlでファイルに書き込みを行なうには、以下のようなコードを使います。ファイルオープン時に＞により書き込みを指示します。

---

$line = "sample";

open(OUT, ">data.dat"); # 上書きオープン
print OUT $line; # data.dat に $line の内容を出力
close(OUT);

ファイルに追加で書き込むには＞＞により指定します。

$line = "test";
open(OUT, ">>data.dat"); # 追加オープン
print OUT $line; # data.dat に $line の内容を出力
close(OUT);

---