@txtliste= grep{ $_ =~ /\.txt/  and -f $_ }           # test ob es .txt-Datei ist
                map{ $ziel . '\\' . $_ }                         # Pfad zusammensetzen
                readdir(DIRHANDLE2);                        # auslesen