問題タブ [perl-io]

注意してください - 私は、ファイルを開いたり読んだりする「正しい」方法、またはファイルを毎回開いたり読んだりする方法を探しているわけではありません。私は、ほとんどの人がどのような方法を使用しているかを知り、同時にいくつかの新しい方法を学ぶことに興味があります:)*

私の Perl プログラムで非常に一般的なコード ブロックは、ファイルを開いて読み書きすることです。私はこれを行う多くの方法を見てきましたが、このタスクを実行する際の私のスタイルは、何年にもわたって何度か変化しています。これを行うための最善の方法（最善の方法がある場合）は何ですか？

私は次のようなファイルを開いていました：

しかし、エラートラップに問題があると思います。

括弧を追加すると、エラー トラップが修正されるようです。

ファイルハンドルを変数に代入することもできるので、上記のように "INPUT_FILE" を使用する代わりに、$input_filehandle を使用することもできました。

ファイルを読み取る場合、ファイルが小さい場合、このようにグロビングに問題はありますか?

また

または、次のように常にループする必要があります。

perl で物事を達成する方法がたくさんあることは知っていますが、ファイルを開いて読み込むための推奨/標準的な方法があるかどうか疑問に思っています。

Perl でファイル処理を使用して、Perl コードの行を生成したいと考えています。たとえば、次のようになります。

しかし、（生成されたコードではなく）ジェネレーターコードをコンパイルすると、次のエラーが発生します。

私は何をするつもりですか？

構成ファイルにあるエラーを検索する Perl のスクリプトがありますが、エラーが発生すると出力されます。構成ファイルの内容を一致させ、最後にエラーが発生したときだけ出力する必要があります。何か案は？

うわー…こんなに反応するとは思わなかった。これは、Nagios にアラートを送信する Windows ボックスでのログ監視用であることをもっと明確にすべきでした。これは実は私にとって初めての Perl プログラムであり、このすべての情報は非常に役に立ちました。これをウィンテルボックスのテールアンサーに適用する方法を知っている人はいますか?

Perlコード

4つのフラグはすべて、設定されている環境変数の名前です（echo $flag1シェルから使用して確認しました）。

ここで、if条件は常にfalseを返します。と書く$ENV{flag1}と、結果はtrueになり、func()期待どおりに呼び出されます。

ifステートメントで何が間違っていますか？

メッセージを別のファイルにリダイレクトして、die後でそのファイルを比較して何が問題なのかを判断できるようにしたいと考えています。

しかし、このコードは私にエラーを与えます:

2>発信者からのa を実行したくありません。スクリプト内からリダイレクトする方法はありますか?

これは 2 回印刷されOKます。これは、Perl が$dir内部的に utf8 として保存するためだと思います。

PerlIO::fseがファイル テスト オペレータに影響を与えているかどうかを確認する方法はありますutf8か?

編集：

たぶん、私はどのように機能するかを正確に理解していませんPerlIO::fse-この例では、次の効果は見られませんPerlIO::fse:

PerlIO::eol パッケージをインストールせずにプロジェクトの一部として追加しようとしています。これにより、すべての依存関係を各マシンに再インストールすることなく、スクリプトと共にパッケージ化できます。PerlIO::eolの構造と重要なファイルの場所がわかり ません

Perlのパイプからバッファリングされていないデータを読み取ろうとしています。たとえば、以下のプログラムでは：

iostatは10秒ごと（5回）にデータを吐き出します。あなたはこのプログラムが同じことをすることを期待するでしょう。ただし、代わりに50秒間（つまり10x5）ハングしているように見え、その後すべてのデータを吐き出します。

EOFを完全に待たずに、利用可能なデータを（バッファなしで）返すにはどうすればよいですか？

PS私はWindowsでこれについて多くの言及を見てきました-私はLinuxでこれを行っています。

$a変数, $b,にいくつかの値が格納されています$c。これらの値を新しいファイルにロードする必要があります (ファイルの作成とロード)。Perl を初めて使用するのですが、どうすればよいですか?