--- Chas Owens <[EMAIL PROTECTED]> wrote:
>
> oops, the map should be
>
> print map { join(",", ($_) x $i++),"\n" } @a;
>
Also using for loop is may better since many ppl on
this list said map would consume too much memory if
the input array is large enough.
print join(",", ($_) x ++$i),"\n" for @a;
--
http://home.arcor.de/jeffpang/
http://home.earthlink.net/~pangj/
____________________________________________________________________________________
Pinpoint customers who are looking for what you sell.
http://searchmarketing.yahoo.com/
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
