in reply to reset of match variables

Just use /$regex/ and $SUM += $1

In Section Seekers of Perl Wisdom