我想在 Perl 脚本中使用正则表达式在文件中搜索一行。
假设它在安装了 grep 的系统中，最好:
grep通过 open()命令 open()直接使用该文件并使用 while循环和 if ($line =~ m/regex/) ? 最佳答案
在现代 Perl 实现中，regexp 代码应该和 grep 一样快，但是如果您关心性能，为什么不直接尝试一下呢？从代码清洁度和健壮性的角度来看，调用外部命令行工具肯定不好。
关于regex - 如何快速找到与正则表达式匹配的文件的第一行？，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/365259/