my $count = () = $text =~ /$word_regex/g;