perl -ne '/$regex/, $SUM += $1; END { print $SUM }' file.txt