速度が問題でなければ、ループでopen（）とclose（）を実行するのは悪いですか？

Question

出力ログに使用する別のプログラマーのPerlスクリプトを修正しました。 perlスクリプトはファイルを通過し、すべてのファイルについて、ログをopen（）し、write/printしてからclose（）します。これは何度も起こります。私はPerlスクリプトがハングアップすると（それはやっとそれをやり始め、私はそれを修正するのに十分な知識がありません）、データを失わないようにこれを行います。したがって、私はそのループでopen（）とclose（）を繰り返す良い選択肢はありません。

私の主な質問はこれです：Perlスクリプトは個人用ですので、速度の低下は問題ではありません。しかし、オープン/クローズのこのような不適切な使用の可能性がある他の悪いことがありますか？それは愚かな質問のように聞こえるかもしれませんが、これは私のハードディスクを早く落とす可能性がありますか、または私はファイル処理の仕組みを誤解していますか？

ありがとうございます。

Answer 1

理論的には、できるだけ早く接続を開いたり閉じたりするのが一般的です。ファイルも変わりません。実行する2つのことは、ファイルのロックとパフォーマンスです。

他のユーザーがファイルに同時にアクセスすると、ファイルのロックが発生する可能性があります。

パフォーマンスは、前述したように、大きな問題ではありません。

オープン/クローズ操作を待つのライフタイムについては言及していません...並行処理が非常に多く、何十万という動作が見られます。

Answer 2

OSはハードドライブアクセスを決定しますので、正常に動作するはずです。たくさんのファイルを開く（）と閉じる（）必要があるなら、それは大丈夫です。あなたが手動で編集した後に再開すると、データが失われる可能性があります（ただしこれはかなりまれなシナリオです）。また、あなたのスクリプトがクラッシュした場合、ディスクリプタはとにかく解放されるので、私が知る限り問題はありません。

Answer 3

他にも言及したように、パフォーマンス（およびおそらくコードのクリーンさ）以外に問題はありません。しかし

、あなただけのファイルハンドルに自動フラッシュ設定し、「Perlはハングアップした場合にデータを失うこと」について単に心配している場合：HANDLEへ

use IO::Handle; 
open HANDLE, '>log.txt' 
    or die "Unable to open log.txt for writing: $!"; 
HANDLE->autoflush(1); 

今、すべてのprintは自動的にフラッシュされます。開閉を続ける必要はありません。

詳細については、perldoc man pageの「autoflush」を検索してください。