if (! $sth_insert->execute(
                                $$data{'id'},
                                $$data{'name'}
                               ) ) {

      print 'Insert error: '.$sth_insert->errstr if $debug;
      print "Doing update (name: $$data{name}, id: $$data{id})\n";
      $sth_update->execute(
                                $$data{'name'},
                                $$data{'id'}
                          ) or die("Insert and Update failed, update: ".$sth_update->errstr );
 }
 else {
    print "Inserted (name: $$data{name}, id:$$data{id})\n";
 }