-- Paul Makepeace <[EMAIL PROTECTED]>
So I'll stick with,
my ($str, @tmp) = splice @names, 0, 90/3;
$str .= ', '.shift @tmp while 90 > length($str . $tmp[0]);
$str .= ', etc.' if @tmp;
This does not limit the total string length to 90. The
final separator can force an item to dangle and so might
the final ', etc.'.
--
Steven Lembark 2930 W. Palmer
Workhorse Computing Chicago, IL 60647
+1 800 762 1582
