修改文件中的Perl搜索以仅包含指定的目录

Question

我在here下面找到了代码示例。它在文件中搜索文本，通过子目录递归，但我想指定第一级子目录的子集来递归。

E.g。假设我在目录C:\中包含目录bin，src和Windows，我希望以递归方式搜索.h和{{ 1}}包含文字＆＃34;包含＆＃34;的文件，我在下面的MWE中执行以下操作，我的代码位于.c：

textsearch.pl

如何将此程序修改为仅在perl textsearch.pl include "(\.)(h|c)($)" 和bin而非src中进行搜索，同时仍然会递归到Windows的子目录中bin？即我希望能够做到以下几点：

src

我认为perl textsearch.pl include "(\.)(h|c)($)" src,bin 会有所帮助，但我无法弄清楚如何在这里应用它。

另外，如果还有另一种更简单的方法来做这一切，我很乐意听到它。

MWE我发现：

File::Find::Rule

Answer 1

要扫描的second parameter to the find() method can be a list个目录。将$cwd替换为@some_list_of_directories，您应该好好去