Select Code to Download

Can't locate object method "new" via package "Text::Extract::Word" at 
+monks.pl line 11.

# legacy interface
use Text::Extract::Word qw(get_all_text);
my $text = get_all_text("test1.doc");