【Perl】ファイルロック(排他処理)について語ろうat PHP【Perl】ファイルロック(排他処理)について語ろう - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このｽﾚｯﾄﾞのURL■項目テキスト360:nobodyさん 03/04/18 23:20 >>358 一回使ったらまた集めなきゃならないだろ。 361:nobodyさん 03/04/19 13:00 EJZQKwDz http://homepage1.nifty.com/glass/tom_neko/web/web_04.html に載ってる「ファイルを上書きする場合」（↓） open(OUT, "+< $datafile"); # 読み書きモードで開く flock(OUT, 2); # ロック確認。ロック seek(OUT, 0, 0); # ファイルポインタを先頭にセット print OUT "$data\n"; # 書き込む truncate(OUT, tell(OUT)); # ファイルサイズを書き込んだサイズにする close(OUT); # closeすれば自動でロック解除 を参考にして、 「（１）ファイルの中身（データ）を読み込んで、読み込んだデータを加工して、 （３）再度同じファイルにデータを格納する場合」を考えたんだけど、 ↓で特に問題ないでしょうか？ $datafile = "data.txt"; open(OUT, "+< $datafile"); # 読み書きモードで開く flock(OUT, 2); # ロック確認。ロック @Array_data = <OUT>; # ★追加：（１）ファイルの中身を読み込んで foreach $values (@Array_data){ #@Array_dataをいろいろ加工; # ★追加：（２）読み込んだデータを加工 chomp $values; $values = $values * 2; push (@New_Array_data,"$values\n"); } seek(OUT, 0, 0); # ファイルポインタを先頭にセット print OUT @New_Array_data; # ●変更：（３）再度同じファイルにデータを格納 truncate(OUT, tell(OUT)); # ファイルサイズを書き込んだサイズにする close(OUT); # closeすれば自動でロック解除 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch