問題タブ [filehandle]

ファイルハンドルがバイナリ モードまたはテキスト モードを使用しているかどうかを検出する必要があります。これは、str/bytes をエンコード/デコードできるようにするために必要です。どうやってやるの？

バイナリ モードを使用するmyfile.write(bytes)と機能し、テキスト モードを使用すると機能しますmyfile.write(str)。

myfile.write() を呼び出す前に引数をエンコード/デコードできるようにするために、これを知る必要があるという考えです。そうしないと、例外で失敗する可能性があります。

これを尋ねるのはばかげていると思いますが、いくつか試してみましたが、どこに行くべきかわかりません。

Expect.pm ドキュメントから:

$object->log_file("filename" | $filehandle | \&coderef | undef)

セッションをファイルに記録します。生成されたプロセスとの間で送受信されるすべての文字がファイルに書き込まれます。

$filehandle を log_file に渡したいです。しかし、私がこれを試したとき：

スクリプトを実行しているディレクトリに「LOG」という名前のファイルを取得します。いくつかの調査の後、私はこれを試しました：

これで、ディレクトリで名前が付けられたファイルを取得します*main::LOG。オプションで指定した名前の別のファイルもあり-lますが、送信する行のみが含まれていますprint LOG。

ファイル処理機能が関数に組み込まれているかどうか、または何か間違っているかどうかはわかりません。

プログラム全体に、特定のファイルにデータを追加する必要がある関数が複数あるとします。プログラムの開始時にグローバル ファイル ハンドルを使用してファイルを開き、必要な場所に追加できるようにします。（ファイルハンドルを引数として関数に渡すことができることはわかっていますが、それはこの質問の目的ではありません）。プログラムの最初にファイルハンドルを開き、最後に閉じるのは悪いことですか? それとも、関数に言ってvoid AppendFile(char *data_to_append);からファイルを開いて追加し、この同じ関数で閉じる方が良いですか? プログラムが停止した場合、FD がまだ使用されていることが唯一の悪いことですが、同時に、関数を使用すると、同じファイルを何百回も何百回も開いたり閉じたりすることになります。

以下の命名規則に従って、logs ディレクトリに複数のアクセス ログがあります。

基本的に、ログは Apache によって 1 日ごとに「ローテーション」されるため、順番に並べ替えることができます。

それらを1つのログファイルとして扱うことができるように、「それらを次々に読み取る」ことを試みています。

上記のコードはすべてのログをグロブしますが、よくわかりません:

• ログはどの順序でアルファベット順に編成されますか?
• 「一意の IP からの最新のアクセス時刻」を確認したい場合、どうすればよいですか?

単一のアクセス ログを読み取り、これを簡単に確認できる Perl スクリプトがあります (私のアルゴリズムは、IP アドレスをキーとして、アクセス時間を値として使用する大きなハッシュを持ち、キーと値のペアをプッシュし続けることです) ...)。しかし、このプロセスのためだけに、すべてのアクセス ファイルを 1 つの一時ファイルにマージしたくありません。

助言がありますか？よろしくお願いします。

このように呼び出すサブルーチンがいくつかありますmyWrite($fileName, \@data)。 myWrite()ファイルを開き、何らかの方法でデータを書き出します。上記のように、または最初の引数としてファイルハンドルを使用してmyWrite呼び出すことができるように変更したいと思います。（この変更の主な理由は、ファイルのオープンをモジュールではなく呼び出し元のスクリプトに委任することです。IOサブルーチンに書き込み先を指示する方法についてより良い解決策があれば、それを聞いてうれしいです。 ）。

これを行うには、最初の入力変数がファイルハンドルであるかどうかをテストする必要があります。私はこの質問を読んでそれを行う方法を理解しました。

これが私の質問です。このファイルハンドルに書き込めるかどうかもテストしたいと思います。私はそれを行う方法を理解することはできません。

これが私がやりたいことです：

私が知る必要があるのは、ファイルハンドルに書き込むことができるかどうかだけですが、ファイルハンドルが「>>」または「<」で開かれたかどうか、または開かれていないかどうかを示す一般的な解決策を確認するとよいでしょう。開くなど。

（この質問は関連していますが、私の質問には答えていないようです。）

私はiPhoneアプリを開発しています.ファイルシステム上に特定のサイズのファイルを作成し、最初にNOデータで満たす必要があります.次に、オフセットを探して、別の場所からデータを取得するときにデータを書き込みます
.

で、私はこれperldoc perlvarを読みました:

現在、「ARGV」は「<>」演算子内でのみ魔法の効果を持つことに注意してください。他の場所では、"<>" によって開かれた最後のファイルに対応する単純なファイルハンドルです。特に、ファイルハンドルを必要とする関数にパラメータとして「*ARGV」を渡すと、関数が @ARGV 内のすべてのファイルの内容を自動的に読み取らない場合があります。

では、ファイルハンドルを期待する関数にパラメーターとして (またはそれに似たもの)を渡し、その関数にすべてのファイルを読み取らせるにはどうすればよいでしょうか?*ARGV@ARGV

重複の可能性:
Perl でファイルを文字列に丸呑みする最良の方法は何ですか?

このコードは、ファイルの内容を Perl の変数に読み込む良い方法ですか? それは機能しますが、使用すべきより良い方法があるかどうか知りたいです。

重複の可能性：
ファイルハンドルに書き込めるかどうかをテストするにはどうすればよいですか？

与えられたスカラー変数がファイルハンドルを保持しているかどうかをPerlでチェックする方法を見つけたので、ファイルハンドルが読み取り用に開かれたか、書き込み用に開かれたかをチェックすることは可能ですか？もしそうなら、それをチェックする方法は？

-rおよび-w演算子は、私が理解していることから、実際のファイルに開かれたファイルハンドルでのみ機能し、パイプ、メモリ内ファイル（スカラーに開かれた）などでは機能しません。

次のようなテキスト ファイルがあります。

常に同じ行が 5 行あり、6 行目からデータの読み取りを開始します。データを読み取る際、各行 (6 行目以降) はセミコロンで区切られます。各行の最初のエントリを取得する必要があります (6 行目から)。

例えば：

必要な出力は次のとおりです。

これは可能ですか?可能であれば、どこから始めればよいですか?