$permutations_total += () = $string =~ /$promoters_regex[$j]/g;