Skip to content
Create a gist now

Instantly share code, notes, and snippets.

while (my ($sense, $sense_info) = each %sense_information_hash) {
print "\nKey => $sense\n";
print " Count(sense) => $sense_info->[0]\n";
while (my ($word, $count) = each %{ $sense_info->[1] }) {
print " Word wt sense => $word\n";
print " Count => $count\n";
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Something went wrong with that request. Please try again.