in reply to This should be easy: counting letters in a string

 map { print $count = $string =~ s/$_//g } @letters;