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