($esc_spalten_name = $spalten_name) =~ s/([_%])/\\$1/g;    @werte = $dbh->selectrow_array (            "SHOW COLUMNS FROM $tabellen_name            LIKE '$esc_spalten_name'"