Warning: file_get_contents(/data/phpspider/zhask/data//catemap/8/perl/9.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Perl:基于列的某些值打印某些行_Perl - Fatal编程技术网

Perl:基于列的某些值打印某些行

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

大家好,我是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   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”;