使用system或grep从文件中grep

Question

我这里有一些代码。但我不认为它有效。

 my $answer = grep (/$A'\t'$B/, $file);

或者我试过

 my $answer = system( "grep $A'\t'$B, $file);

第一个没有打印任何东西，第二个打印出实际的grepped线到控制台。但是，$ answer仍然是

我的目标是从文件中获取grep行。我知道应该只有一场比赛。我想将$ file中匹配“$ A \ t $ B”的行保存到变量$ answer。我想知道如何在不读取整个文件的情况下这样做。但如果我逐行阅读，我认为这在时间上是低效的，因为在这里我将多次这样做。如果我读完整个文件，我害怕内存问题。

有什么想法吗？

Answer 1

尝试使用反引号：

my $answer = `grep $A'\t'$B $file`;