>>107

$kosuu = () = "aaaaaaaaあああaaaaaaaaああああaaa" =~ /aaa/g;
printf "aaaの個数＝$kosuu\n";