在其中，perl我可以通过执行以下操作遍历当前目录中的文件：
foreach $file (<*.*>) {
print "$file found\n";
# do stuff
}
除了所有子目录中的所有文件，我该如何做同样的事情？
File :: Find :: Rule是一个很好的递归列出文件的模块。
所有文件（根据您的要求）：
use File::Find::Rule qw( );
for my $qfn (File::Find::Rule->in(".")) {
...
}
仅带有“。”的文件。以他们的名字（按照您的示例）：
use File::Find::Rule qw( );
for my $qfn (File::Find::Rule->name("*.*")->in(".")) {
...
}
添加->file将结果限制为纯文件（过滤出目录）。
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
我来说两句