BEGIN{FS="\t";getline;} { if ( ($1>999)&&($3==0)&&($5==0) ){i1++;s1[$7]=$1;} if ( ($1==0)&&($3>999)&&($5==0) ){i2++;s2[$7]=$3;} if ( ($1==0)&&($3==0)&&($5>999) ){i3++;s3[$7]=$5;} n++; }END{print n" "i1" "i2" "i3; for (s in s1){print "IMP1 "s1[s]" "s;} for (s in s2){print "IMP2 "s2[s]" "s;} for (s in s3){print "IMP3 "s3[s]" "s;} }