http://www.perlmonks.org?node_id=9952


in reply to How do I split up a long string with no spaces?

$string=~s/(\S{$numoflettersbeforebreaking})/$1 /g;

[download]

In Section Seekers of Perl Wisdom