【Perl】ファイルロック(排他処理)について語ろうat PHP【Perl】ファイルロック(排他処理)について語ろう - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このスレッドのURL■項目テキスト835:nobodyさん 05/12/08 21:14:40 pHM0ErCM ちなみに、使い方は下記のように使います。 require './filelock.pl'; $file = filelock::readOpen( "count.dat" ); $data = <$file>; close( $file ); $data = $data + 1; $file = filelock::writeOpen( "count.dat" ); print $file $data; close( $file ); 836:nobodyさん 05/12/08 23:57:56 普通にflock使えばいいのにと野暮な突っ込み。 斜め読みしただけだから適当に。 ノンブロッキングロックじゃないと、whileループ内は無駄。 test.txtとtest.datが同じファイルと見なされる。 ロックを解除してるところがない? サンプルスクリプトはロックが壊れる典型。 837:nobodyさん 05/12/09 00:42:03 >>836 解答ありがとうございます。 >ノンブロッキングロックじゃないと、whileループ内は無駄。 そうですね。2(LOCK_EX)ではなくて2|4(LOCK_EX|LOCK_NB) とすればokですね。 >test.txtとtest.datが同じファイルと見なされる。 まぁ、これは仕様という事で…(^^; >ロックを解除してるところがない? ENDの中のcloseで解除しているつもりなのですが closeではロックは自動的解除されないのでしょうか? >サンプルスクリプトはロックが壊れる典型。 どういう場合にロックが壊れるのでしょうか? ご掲示頂けるとありがたいです。 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch