Text ersetzen mit Batch

Hallo zusammen,

ich frage mich ob folgendes per Batch möglich ist, da ich mich mit Perl rumschlage und es nicht auf die Kette bekomme:

Folgender Beispieltext innerhalb einer .txt im Beispielpfad C:/User/Test
Es sind immer mehrere Textdateien im Ordner vorhanden, welche identisch aufgebaut sind, jedoch inhaltlich unterschiedlich sind.
(XXXXX sind personenbezogene Daten)

Txt Datei 1:


Txt Datei 2:


Ich möchte gerne folgedes:

Das erste "null" soll IMMER bei jeder .txt ersetzt werden durch eine Zahl welche keine Abhängigkeit hat, zum Beispiel immer durch 200088.

Das zweite "null" soll ersetzt werden in Abhängigkeit durch ein bereits gefundenes Word - im ersten Fall GYN, im zweiten Fall CH1.


Es sind immer mehrere Textdateien im Ordner vorhanden, welche identisch aufgebaut sind, jedoch inhaltlich unterschiedlich sind.

Möglich ist auch die Schritte zu trennen und zwei Batch Dateien zu erstellen, welche kurz nacheinander laufen.


In Perl bekomme ich Schritt 1 programmiert, allerdings hänge ich bei Schritt 2.

Da die Batch später auf einem Server laufen soll wäre der weg über die CMD und Batch einfacher.

Danke ;)

Get-ChildItem "D:\Ordner" -File -Filter *.txt | %{  
    $csv = Import-CSV $_.Fullname -Delimiter "|" -Header (1..15)  
    $csv.11 = "200088"  
    $csv.13 = $csv.'4'.split(" ")  
    ($csv | convertto-csv -Delimiter "|" -NoTypeInformation | select -skip 1) -replace '"','' | sc $_.Fullname  
}

Get-ChildItem "C:\Users\gemuendadm\Desktop\PGTEST123\*" -File -Include *.txt,*.dat | %{  
    $csv = Import-CSV $_.Fullname -Delimiter "|" -Header (1..15)  
    $csv.11 = "200088"  
    $csv.13 = $csv.'4'.split(" ")  
    ($csv | convertto-csv -Delimiter "|" -NoTypeInformation | select -skip 1) -replace '"','' | sc -Path ($_.Fullname -replace "\.txt$",".dat")  
    if ($_.Extension -eq ".txt"){del $_.Fullname -Force}  
}

[IO.File]::WriteAllText("C:\Pfad\datei.csv","Inhalt")