for (@values) { my $affected = $dbh->do(qq{INSERT INTO $table (col1, col2) VALUES (?, ?)}, undef, @$_); }