Help for this page
Select Code to Download
Select
or
download this
$string =~ s/^(.{15}).+$/$1/;
Select
or
download this
$string =~ s/^(.{1,15})\s*.*$/$1.../;