my $substr_count_2 = scalar($string =~ m/(a)/g);