□Perl 講座 初級編 > ファイルの入出力

◆ファイルの読み込み

カウンタや掲示板・チャットやその他の多くのCGIではログファイルなどの外部ファイルとのやり取りを行います。ここでは簡単なやり取りについて説明していきます。

外部ファイルを読み込む場合open関数を用います。
構文: open ファイルハンドル名, "ファイル名";

オープンすることによってファイルハンドルが新規に作成され、そのハンドルは指定したファイルと関連づけられます。オープン後はファイルハンドルを使って読み込みや書き出しを行うことが可能になります。
openが無事処理されれば『真』、失敗すれば『偽』を返します。

ファイルハンドルが不必要になったらclose関数を使ってクローズします。クローズしなくても、ファイルハンドルを再度オープンしたときや、プログラムが終了した時点で自動的にクローズされるらしいですが、わかりやすい記述を心がけるならクローズすることを忘れずに記述するように心がけましょう!!
構文: close ファイルハンドル名;

open IN, "test.log"; #記述例 INはファイルハンドル名 test.logはファイル名
実行文;
close IN;

ファイル操作(オープン)をする上で失敗することは多々あることです。そんなときの為に失敗した場合はdie()か『偽』が帰ってきた場合に、エラー用のサブルーチンを用意しておくことをお薦めします。



◆ファイルの書き出し

ファイルを書き出したいときは以下のように記述します(手抜き)(^−^;

open OUT, ">test.log"; #ファイル名の前に『>』をつけると追加書き込み
print OUT "test";
close OUT;

open OUT, ">>test.log"; #ファイル名の前に『>>』をつけると上書き
print OUT "test";
close OUT;

追加書き込みしたいのか、上書き保存したいのかでファイル名の前の不等号が違いますので、気をつけてください。

□初級編 プログラミングに入る前に