Perl:基于列的某些值打印某些行
大家好,我是Perl编程中的begginer,在my list.txt上有5行7列,我想做的是根据列的值打印某些行,例如:Perl:基于列的某些值打印某些行,perl,Perl,大家好,我是Perl编程中的begginer,在my list.txt上有5行7列,我想做的是根据列的值打印某些行,例如: NO. RES REF ERRORS WARNING PROB_E PROB_C 1 k C 0 0 0.240 0.713 2 l C 16 2 0.365 0.568 3 n C 7 4 0.365 0.568 4
NO. RES REF ERRORS WARNING PROB_E PROB_C
1 k C 0 0 0.240 0.713
2 l C 16 2 0.365 0.568
3 n C 7 4 0.365 0.568
4 f E 0 0 0.613 0.342
我想从第3,4列(错误和警告)打印所有值不同于0的行。在这种情况下,输出到的是第2行和第3行。我希望我说清楚:)对不起,我的英语很差 试试这个:
perl -ane 'print if ($F[3] or $F[4])' list.txt
你试过什么?除了来这里问“请原谅我的代码”,当然我试过了,我找到了一种不那么切碎的方法,但它就在这里。而($line=){@parola=split'',$line;如果($parola[16]!=0)和($parola[18]!=0)),则打印“$line”;