Help for this page

Select Code to Download

Select or download this

while ( my ($word,$count) = each %u_wc) {
    print "$word: $count\n"
}