Help for this page

Select Code to Download

Select or download this

#example 1
$content =~ s/(.{1,$width}) /$1<BR>/g;
print $content;

Select or download this

#example 2
$content =~ s/(.{1,$width}) |([^ ]{$width})/$1$2<BR>/g;
print $content;