perl-ne 'BEGIN {$arg = shift} split(/,/);if ($_[7] eq $arg){$cnt++;}END{print "There are $cnt things in this file\n";}' arg file_name.txt