perl -F, -M'5;my $t = 0' -lanE '$t += $F[2];}{ say $t' some_file.csv