in reply to break up text string into 70 character long tokens
You might want to look at Text::Wrap.