On 01/08/2011 19:14, Dr.Ruud wrote:
my ($rtioverview) = $string =~ /(.{0,100})\b/;
That would have to be
my ($rtioverview) = $string =~ /(.{0,99})\S\b/;
to avoid terminating at the start of a non-space sequence.
Rob
--
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
http://learn.perl.org/
