Help for this page
Select Code to Download
Select
or
download this
1 while $msg =~ s/(\S{30})(\S)/$1 $2/;
Select
or
download this
$msg =~ s/(\S{30})(?=\S)/$1 /g;