Help for this page

Select Code to Download

Select or download this

  $word=~s/[^\w]//g; # Eliminate non-word chars

Select or download this

  $hash{$word}++;  # Get a count of the word

Select or download this
```
   keys (%hash)
```