-----Original Message----- $sth->execute(undef,$data[0],$data[1],$data[2],$data[3],$data[4],$data[5 ],$dat a[6],$data[7],$data[8],$data[9],$data[10],$data[11],$data[12],$data[13], $data[14 ],$data[15],$data[16],$data[17],$data[18],$data[19],$data[20]) or print "Error with INSERT _execute_: $DBI::errstr\n";
}
The 'execute' statement is quite long, and almost all of the
data comes from a single array. I don't think this is a big deal in and
of itself, just looking for a better way to do this. Thanks.
Scott Nipp
Phone: (214) 858-1289
E-mail: [EMAIL PROTECTED]
Web: http:\\ldsa.sbcld.sbc.com
-----------------------------------
This should work:
$sth->bind_param(1, undef);
$sth->bind_param($_+2, $data[$_]) foreach 0..20;
$sth->execute() or print "something";
but if you are guarenteed to have 21 elements in @data (never more) then you probably
want:
$sth->execute(undef, @data) or print "something";
In the latter case:
recall that in Perl any method just takes a list,
and
recall that in Perl, a list can be created by interpolating scalars and lists.
Brian Campbell (E-mail).vcf
Description: Binary data
