Lingua::EN::Sentence can split up text into nice english sentences, a plain length on those sentences would get you what you requested...

Greetz
Beatnik
... Quidquid perl dictum sit, altum viditur.