readdir

1熱

6答えて

複数のディレクトリを読み込み、Perlのサブディレクトリの内容を読むにはどうすればよいですか？

私にはフォルダがあり、その中には多くのサブフォルダがあります。これらのサブフォルダには、多数の.htmlファイルが読み込まれています。私はそれを行うために次のコードを書いています。親フォルダと最初のサブフォルダが開き、1つの.htmlファイルしか印刷されません。それはエラーを示します： NO SUCH FILE OR DIRECTORY 私はコード全体を変更したくありません。既存のコードの変更

2熱

3答えて

opendirとreaddirのPerlプログラムのヘルプ

私はいくつかのテキストファイルを消去するプログラムを持っています。プログラムは、ユーザがこれらのテキストファイルを含むディレクトリの完全な経路を入力するように要求する。そこから、ディレクトリ内のファイルを読み込み、新しいファイル（ユーザーが指定したファイル）に出力し、必要な方法でファイルを消去したいと考えています。私はすでにテキストファイルを消去するためのスクリプトを書いています。私が使用するデ

3熱

6答えて

250,000ファイルのディレクトリに対してPerlのreaddirをスピードアップするにはどうすればよいですか？

Perl readdirを使用してファイルのリストを取得していますが、ディレクトリに250,000を超えるファイルが含まれているため、readdirを実行するのに長時間（4分以上）がかかるため、80MB以上のRAMを使用します。これは5分ごとに定期的な仕事を予定していたため、この遅延時間は受け入れられません。詳細情報：別のジョブでは、スキャン中のディレクトリ（1日に1回）がいっぱいになります。

0熱

4答えて

$カウントが更新されないのはなぜですか？

$dir_handle = @opendir($url) or die("Unable to open $url"); $count = "0"; while ($file = readdir($dir_handle)) { if (!is_dir($url.'/'.$file) && ($file="*.jpg" || $file="*.gif" || $file

7熱

6答えて

パターンによるファイル名のフィルタリング

特定のパターン、たとえば "abc"で始まるディレクトリ内のファイルを検索する必要があります。私はまた結果で ".xh"で終わるすべてのファイルを削除する必要があります。私はPerlでそれをやり遂げる方法についてはわかりません。私はこのようなものがあります：私もすべて、また "・XH" で終わる結果から、すべてのファイルおかげで、バイ

1熱

1答えて

readdir（）issue

私の意図は、入力として与えられたディレクトリをルートとするすべてのディレクトリとファイルを深さ優先で読み込み、以下に示すようにコードの一部（非常に初期）を書きました。今 int main() { DIR *fd_dir; struct dirent *s_dirent; struct stat buff; char str[100]; fd_dir = opendir("/home

6熱

1答えて

whiled条件でreaddir（）の "0"の結果がfalseにならないのはどうですか？

参照：Where in the documentation does it say that while tests readdir for definedness?。（ない重複;ちょうど密接に関連し。）多くの人々がとして慣用以下のループ処理：おそらく後者であるため while (my $file = readdir($dir)) { ... } ： while (define