使用正则表达式在文件上运行awk

Question

我想在文件JUST INPUT中找到所有出现的INPUT。 我有以下内容，但它可以使用INPUT *找到所有内容

awk '{for(i=1;i<=NF;i++){if($i~/^INPUT/){print $i}}}' 

我想支持，但是如果我有INPUT *或INPUT？ 或输入。 （任何正则表达式）而不是上面的INPUT，它应该可以满足要求。

有人知道如何解决以上问题吗？ 谢谢。

我正在尝试使用$ INPUT在perl脚本中执行以下操作

`awk '{for(i=1;i<=NF;i++){if($i~/^$INPUT$/){print $i}}}' $file`

但我无法将其付诸实践？

Answer 1

如果您想使用反引号，请转义所有美元符号（假设您有东西，例如$INPUT 'INPUT'）：

`awk '{for(i=1;i<=NF;i++){if(\$i~/^$INPUT\$/){print \$i}}}' $file | wc -l`;

awk也可以为您计算匹配项的数量（这一行每行一次计数）：

`awk '/\y$INPUT\y/{s++} END{print s}' $file`;

并使用本机Perl，建议：

my $cnt;
open my $f, "<", "input" or die("$!");
while (<$f>) {
    $cnt++ while /\bINPUT\b/g;
}
close $f; 
print $cnt;

Answer 2

您使用正则表达式在开始时achored ^不见尽头$ 。 尝试：

 awk '{for(i=1;i<=NF;i++){if($i~/^INPUT$/){print $i}}}' 

如果要在字段中的任何地方匹配INPUT，请尝试：

 awk '{for(i=1;i<=NF;i++){if($i~/INPUT/){print $i}}}'