open H_READ, "aaa.txt";     #読み込みモードで開く
open H_READ, "< bbb.txt";   #読み込みモードで開く
$fname = "ccc.txt";
open H_READ, "$fname";      #読み込みモードで開く
open H_READ, "< $fname";    #読み込みモードで開く
open H_WRITE, "> ddd.txt";  #新規書き込みモードで開く
open H_WRITE, ">> eee.txt"; #追加書き込みモードで開く
open H_WRITE, "> $fname";   #新規書き込みモードで開く

open H_READ, "< bbb.txt" or die "can not open bbb.txt error $!"; #$!には、システムからのメッセージ
#また、dieと同じような処理を行うwarnもある。
#warnはdieと同じように警告を出すが、強制終了はしない。
open H_READ, "< bbb.txt" or warn "can not open bbb.txt error $!"; #$!には、システムからのメッセージ

open H_READ, "< aaa.txt";
while ()
{
  chomp;
  if (/****/)
  {
    //処理
  }
}
close(H_READ);
#以下の例は、ある文字列を書き込む処理
open H_WRITE, "> ccc.log" or die "create error ccc.log $!";
for ($i = 0; $i < 10; $i++)
{
  #printやprintfに出力先を指定してあげる必要がある
  #デフォルトでは、STDOUTのため
  print H_WRITE "$i\n";
}
close(H_WRITE);
#明示的に、STDOUTから変更する事もできる
select H_WRITE;
open H_WRITE, "> ccc.log" or die "create error ccc.log $!";
for ($i = 0; $i < 10; $i++)
{
  #printやprintfに出力先を指定してあげる必要がある
  #デフォルトでは、STDOUTのため
  print "$i\n";
}
close(H_WRITE);
select STDOUT; #元に戻す  

open H_WRITE, "> ccc.log" or die "create error ccc.log $!";
select H_WRITE; #明示的に出力先の指定
$| = 1; #H_WRITEに対してバッファリングせずにフラッシュさせる
select STDOUT; #元に戻す
print H_WRITE "hahahahaha\n"; #バッファリングせずに、書き込みが行われる
close(H_WRITE);