perl -lane 'print $s += $F[2]'