我在搜索「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:
我在搜索「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:
grep "o" data.txt
這是否幫助?我不知道Perl,但可以使用上面的grep獲得相同的輸出。
print if /o/;
如果你的系統上有grep,那麼命令行中的grep o data.txt
應該有效。
如果做不到這一點,你可以嘗試的Perl:
open IN, 'data.txt';
my @l = <IN>;
close IN;
foreach my $l (@l) {
$l =~ /o/ and print $l;
}
在Perl:
while (<>) { print if /o/; }
或使用grep:
grep 'o' data.txt
grep o data.txt
perl -ne 'print if (/o/);' <data.txt
是一個非常短的一行:
> perl -pe'$_ x=/o/' filename
當你得到你的成績,請更新這個問題,所以我們都可以感到自豪或羞愧。 – 2008-10-16 15:12:56