map {$wordCharCount{$_}++} (split(//,$word));