ログの一部を消すPerlを考えています。ここではソースを短くするために、ログの一部を消し去ってログファイルに上書きするデータは $deta だけだとすると open F, '+ ;//実際はここでもっと処理 truncate F,0; seek F,0,0; print F $deta; close F; と、 open IN, 'a.log'; flock IN,2; open OUT, '>a.log'; flock OUT,2; $deta = ;//実際はここでもっと処理 print OUT $deta; close OUT; close IN; の2つを考えました。上のように読み込みと書き込みを同時にやった方がいいのか下のように分けてやった方がいいのか教えてください。ロックは flock を使って、普通レベルのロックができるぐらいでいいと思っているんだけど、この flock の書き方でおかしいところがあれば教えてください。

ログの一部を消す Perl

解決済

質問者：A__
質問日時：2001/10/24 12:52
回答数：1件

ログの一部を消すPerlを考えています。

ここではソースを短くするために、ログの一部を消し去って
ログファイルに上書きするデータは $deta だけだとすると

open F, '+<a.log';
flock F,2;
$deta = <F>;//実際はここでもっと処理
truncate F,0;
seek F,0,0;
print F $deta;
close F;

と、

open IN, 'a.log';
flock IN,2;
open OUT, '>a.log';
flock OUT,2;
$deta = <IN>;//実際はここでもっと処理
print OUT $deta;
close OUT;
close IN;

の2つを考えました。
上のように読み込みと書き込みを同時にやった方がいいのか
下のように分けてやった方がいいのか教えてください。

ロックは flock を使って、普通レベルのロックが
できるぐらいでいいと思っているんだけど、
この flock の書き方でおかしいところがあれば
教えてください。

通報する

この質問への回答は締め切られました。

質問の本文を隠す

回答 (1件)

No.1ベストアンサー

回答者： noname#25358
回答日時：2001/10/24 14:12

　何を基準にいいか悪いか決めればいいんでしょうか？(^_^;

　好みの問題だからどっちでもいいと思いますが。
　速度的には前者ですが、あとで見たとき分かりづらいので初心者の方には後者を薦めています。

　ちなみに flock はプラットフォームによって使えないこともあるので、

eval { flock(); };

　としておいた方がいいでしょう（使い方に特に問題はありません）。