"Andrew Kennard" <[EMAIL PROTECTED]> wrote in message
news:[EMAIL PROTECTED]
> Hi all
>
<snip />
>
> my $Vals;
> for ( my $i=1;$i<=32;$i++ ) {
> $Vals.='?,';
> }
> chop $Vals;
Ugh.
$vals = join(', ', ('?') x 32 );
Ideally, you should have your data in an array, then:
my $sql = "INSERT INTO table VALUES (${ \join(', ', map('?', @data)) })";
$dbh->do( $sql, undef, @data );
Todd W.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
