my $sth = $dbh->prepare( q(UPDATE url_table SET hits=? WHERE url=?)); while (my ($url, $hits) = each %urlhits_update) { $sth->execute($hits, $url); # ... }