use strict;
use warnings;
use DBI;

my $db = DBI->connect(  $dbid,
                        $user,
                        $password,
                        {
                            PrintError  => 0,
                            RaiseError  => 1,
                            AutoCommit  => 0,
                        },
                    );
my $query = $db->prepare(<<EOSQL);
INSERT INTO temp (field1, field2, field3)
VALUES(?, ?, ?)
EOSQL

my $x = 100;
for my $i (1 .. 10) {
    $query->execute($i, $x, $i % 2 ? 'i is odd' : 'i is even');
    $x += 100;
}
$db->commit;