Not a module, but there is an example in The Perl Cookbook on how to do something similar in chapter 4 (ch04/words if you have the example code tarball).

Update: Linkyfied to example code.