複数のファイルを何度もOpen/Closeさせてるんですが、
ファイルロックは一度で良いんでしょうか？

sub filecheck{
&lock;#
open IN,"$logfile";
#syori
close IN;

open FP,"> $logfile"
#syori
close FP;
.
.
.
.
&unlock;
}

mkdirのロック方式使ってるんですが・・・。