- my $sth = $dbh->prepare("insert into tags (entry,weight) values (?,?)");
- foreach (keys %cloud_result) {
- $sth->execute($_,$cloud_result{$_});
+ foreach my $key (keys %cloud_result) {
+ $sthver->execute($key);
+ if(my $row = $sthver->fetchrow_hashref){
+ my $count = $row->{weight} + $cloud_result{$key};
+ $sthup->execute($count, $key);
+ }else{
+ $sthins->execute($key,$cloud_result{$key});
+ }