Perl in awk mode

When I want to extract data by numeric value in other column, Perl in awk mode might be useful. It is often the case that I forget the option for that in Perl, so I took a note this time.

perl -anle  'print "$F[0]\t$F[3]" if ($F[3] > 0)'

This oneliner means that split column by tab and extract the 1st and 4th column when value of the 4th column is more than 0. I often forget the option -anle.


Written by bonohu in shell on 月 05 2月 2018.