You can certainly do that, though it might be a bit of work. One way you could do it would be something like breaking the string into an array of strings on blanks. Then, for each string in the array that happens to be over 15 characters, you could split on the first comma. Finally, rejoining the array back into a string. Should be something (untested!) like this:
my $reformatted = join(' ', map { length($_) < 16 ? $_ : split /,/,$_,2 } split /\s+/, $original);
I don't particularly like that, though. If I was willing to reformat the users string, I'd just do something like:
$original =~ s/,\s+/, /g;
The code is simple, and it simply ensures that all commas are followed by a space.
...roboticus
When your only tool is a hammer, all problems look like your thumb.
In reply to Re: Counting characters without a space
by roboticus
in thread Counting characters without a space
by htmanning
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |