如何搜索文本然后打印结果？

Question

我正在搜索“o”然后用“o”打印所有行。我必须申请任何建议/代码吗？

data.txt中：

j,o,b:
a,b,d:
o,l,e:
f,a,r:
e,x,o:

期望的输出：

j,o,b:
o,l,e:
e,x,o:

Answer 1

grep o data.txt

perl -ne 'print if (/o/);' <data.txt

Answer 2

如果您的系统上有grep，那么命令行中的grep o data.txt应该可以解决问题。

如果做不到，你可以试试Perl：

open IN, 'data.txt';
my @l = <IN>;
close IN;
foreach my $l (@l) {
   $l =~ /o/ and print $l;
}

Answer 3

grep "o" data.txt

这有帮助吗？我不知道Perl，但你可以使用上面的grep获得相同的输出。

Answer 4

print if /o/;

Answer 5

Perl：

while (<>) { print if /o/; }

或使用grep：

grep 'o' data.txt

Answer 6

作为一个非常短的单行：

> perl -pe'$_ x=/o/' filename