++$wordCount{$_} for split ' ', $string;