2008-03-15から1日間の記事一覧

7.20 非ブロックモードで入出力を行う。

sysopenでファイルをオープンする。 use Fncl; sysopen(MODEM, "/day/cua0, O_NONBLOCK|O_RDRW or die "Cannot" open model: $!\n);

7.19 出力をフラッシュする。

例1 $old_fh = select(OUTPUT_HANDLE); $| = 1; select($old_fh); 例2 use IO::Handle; OUTPUT_HANDLE->autoflush(1); 例3 use IO::Handle; $fh->autoflush(1);

7.18 ファイルをロックする

多くのプロセスが同じファイルを同時に更新できるようにしたい。 flockを使用して、全てのプロセスにロックを遵守させる。 use Fcntl qw(:flock); # LOCK_*定数を使用するため open(FH, "+<", $path) or die; flock(FH, LOCK_EX) or die; # ここでファイルを…