$count += () = $teststring =~ /(test)/g;