foreach $word(keys %everything) {
    print "$word was seen $everything{$word} times\n";
}