my %items_to_insert = (item1=>1,
                       item2=>2);

$statement = "INSERT INTO myTbl (itemName,itemNumber) VALUES(?,?);
my $sth = $dbh->prepare($statement);

foreach my $key (keys(%items_to_insert))
{
   $sth->execute($key,$items_to_insert{$key});
}