Or, of course:
$, = ", ";
print GetColumns ($table);
R
----- Original Message -----
From: "Jeff 'japhy' Pinyan" <[EMAIL PROTECTED]>
To: "Rob" <[EMAIL PROTECTED]>
Cc: <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>
Sent: Tuesday, October 15, 2002 5:55 PM
Subject: Re: creating a string on the fly
> On Oct 15, Rob said:
>
> > $n = 0;
> > foreach $column ( GetColumns ($table) )
> > {
> > print ", " if $n++;
> > print $column;
> > }
>
> That's spelled
>
> print join ",", GetColumns($table);
>
> in Perl. :)
>
> --
> Jeff "japhy" Pinyan [EMAIL PROTECTED] http://www.pobox.com/~japhy/
> RPI Acacia brother #734 http://www.perlmonks.org/ http://www.cpan.org/
> ** Look for "Regular Expressions in Perl" published by Manning, in 2002 **
> <stu> what does y/// stand for? <tenderpuss> why, yansliterate of course.
> [ I'm looking for programming work. If you like my work, let me know. ]
>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
