Question

如何从am文件中读取并使用Perl一次性将匹配的模式一行一行地找到整个文件？

Answer 1

通过在读取文件之前将local $/;句柄添加到perl脚本的开头，将整个文件读入字符串。他们可以将你的正则表达式应用于结果字符串。

构建包含整个文件的长$string后，您可以按如下方式找到所有匹配项：

@matches = $string =~ m/\s*rem/gi;

Answer 2

我知道这很老，但是我遇到了同样的问题，发现答案比所选答案更简单。在perl可执行文件后使用'-0777'（或大于-0400的任何值）与-p或-n一起使用将更改默认的分隔符，并且perl将整个文件插入到$ _

参考：