如何使用perl在目录中搜索文件夹

我不熟悉perl脚本。我想在目录pqr中搜索名为abc的每个文件夹，并将每个abc文件夹的路径写入一个单独的文件n.txt，其中n是filename=pathOfABC形式的整数。有人能给我一些提示吗？

由于任务涉及递归，您可以使用类似的模块

该模块使这样的搜索非常简洁

代码如下所示

use strict;
use warnings;

use Path::Class::Rule;

my $rule = Path::Class::Rule->new->dir->name('abc');

print "$_\n" foreach $rule->all('pqr');

---

谷歌/必应在今天工作吗？你试过试一试吗？向我们展示到目前为止的进展情况。每个abc文件夹是什么意思？查看readdir函数。我可以告诉您该文件夹的路径，而无需运行程序。是pqr/abc

use strict;
use warnings;

use Path::Class::Rule;

my $rule = Path::Class::Rule->new->dir->name('abc');

print "$_\n" foreach $rule->all('pqr');