sub process_urlhits_update{
	my $sql1 = qq {UPDATE url_table SET hits};
	my $sql2 = qq {WHERE url};
	my $sql;
	foreach my $url ( keys %urlhits_update ){
		$sql= qq { $sql1=$urlhits_update{$url} $sql2="$url" };
		my $sth = $dbh->prepare( $sql );
		$sth->execute();
		$urlid_hash{$url}=get_urlid($url) if ! defined $urlid_hash{$url};
		delete $urlhits_update{$url};
	}
}