$string =~ s|(.{0,49}[^\s])\s+|$1<br /><br />|g; [download]
In reply to Re: Insert breaklines into string by jbware in thread Insert breaklines into string by kiat