#$contents = contents of HTML page my $parsed = $scrubber->scrub($contents); my $splitter = new Lingua::EN::Splitter; my @words = $splitter->words($parsed); foreach my $x (@words) { print "$x\n"; }