perl - 如果特定列包含零，如何删除整行？

Question

我需要删除包含的行
第 5 列中的 0 值。

前:

1QWO     10      5     45    100    7.5
1R0R      6      3     15    100    8.5
1R5M      4      0      6      0    6.5
1R8S      4      0      6      0      6
1R9L      2      1      1    100    6.3
1RG8      6      0     15      0    5.8
1RJU     10      0     45      0    7.2
1RKI     12      6     66    100    4.6

后:

1QWO     10      5     45    100    7.5
1R0R      6      3     15    100    8.5
1R9L      2      1      1    100    6.3
1RKI     12      6     66    100    4.6

任何一种衬垫都会非常有帮助。

我知道:

sed '/0/d' file_name

但上面的命令将从所有列中删除 0。

Answer 1

awk '$5 != 0'

除非我添加这个额外的文本，否则机器不会让我提交。