作者jlovet (Want 2 see u no more)
看板Perl
標題Re: [問題] 也是有關資料擷取的一個小問題請教
時間Wed May 14 02:09:57 2008
幫你寫一個如果有ccccc就會印出第一行數字的
這樣應該很好改
#!/usr/bin/perl
$/="\n\n";
while(<STDIN>){
print ((split/\n/,$_)[0]."\n") if ($_=~m/ccccc/);
}
$ ./xxx.pl<xxx.txt
1111111
3333333
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.123.102.254