如何使用 bash 或 Perl 脚本遍历目录树？

Question

我对 bash 脚本很感兴趣，并且想知道如何遍历 unix 目录并记录当前正在查看的文件的路径（如果它与正则表达式条件匹配）。

它会像这样：

• 遍历一个大的unix目录路径文件/文件夹结构。
• 如果当前文件的内容包含与一个或多个正则表达式匹配的字符串，
• 则将文件的完整路径附加到结果文本文件。

Bash 或 Perl 脚本都可以，但我更喜欢使用带有 grep、awk 等命令的 bash 脚本来执行此操作。

Answer 1

find . -type f -print0 | xargs -0 grep -l -E 'some_regexp' > /tmp/list.of.files

重要部分：

• -type f 使查找列表仅包含文件
• -print0 打印的文件不是用 \n 而是用 \0 分隔 - 它在这里是为了确保它可以工作，以防你的文件名称中包含空格
• xargs -0 -将输入拆分为 \0，并将每个元素作为参数传递给您提供的命令（本例中为 grep）

使用 xargs 的一个很酷的事情是，如果您的目录确实包含很多文件，您可以通过并行来加速该过程it：

find . -type f -print0 | xargs -0 -P 5 -L 100 grep -l -E 'some_regexp' > /tmp/list.of.files

这将在 5 个单独的副本中运行 grep 命令，每个副本扫描另一组最多 100 个文件

Answer 2

使用 find 和 grep

find . -exec grep -l -e 'myregex' {} \; >> outfile.txt

-l 在 grep 上仅获取文件名

-e 在 grep 上指定一个正则表达式

{} 将找到的每个文件放置在grep 命令末尾的 find 命令

>> outfile.txt 附加到文本文件

Answer 3

grep -l -R <正则表达式>应该可以完成这项工作。

Answer 4

，您可以采用人们建议的 find 命令，并使用 find2perl 将它们转换为 Perl 脚本：

如果您有：

$ find ...

如果您想在 Perl 中执行此

$ find2perl ...

操作 输出一个执行相同操作的 Perl 程序。 从那时起，如果您需要在 Perl 中做一些简单但在 shell 中却很难的事情，您只需扩展 Perl 程序即可。

Answer 5

find /path -type f -name "*.txt" | awk '
{
    while((getline line<$0)>0){
        if(line ~ /pattern/){
            print $0":"line
            #do some other things here
        }
    }    
}'

类似线程

Answer 6

find /path -type f -name "outfile.txt" | awk '
{
    while((getline line<$0)>0){
        if(line ~ /pattern/){
            print $0":"line
        }
    }    
}'