$ perl -naF'\t' -E'$n+=$F[0]>600;END{say$n}' your-data [download]
In reply to Re: Getting the right count by JavaFan in thread Getting the right count by dukea2006