my $sth = $dbh->prepare( qq{INSERT INTO $tabelle ($spaltenname) VALUES (?)
  ON DUPLICATE KEY UPDATE $spaltenname=?; } );