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