Doppelte Zeilen in Text-Datei löschen

Hallo
ich schreibe lange Übersetzungsprogramme in FoxPro in unten folgender Text-Datei-Form.
Die Datei ist allerdings durch Zusammenführung verschiedener Versionen voller Duplikate, welche gelöscht werden sollen.

Die Reihenfolge und alle Zeichen müssen unbedingt eingehalten werden.

Was für ein batch kommt da infrage ?


*
...
update papworth set deut = STRTRAN(deut,"cantoned", "bewink.")
update papworth set deut = STRTRAN(deut, 'waved & ', " gewellt u. ")
RETURN

Function frut
update papworth set deut = STRTRAN(deut,"cantoned", "bewink.")
RETURN

Function Klammer
*update papworth set deut = STRTRAN(deut,"]", "")
*update papworth set deut = STRTRAN(deut,"{ ", "{")
*update papworth set deut = STRTRAN(deut," }", "}")
*update papworth set deut = STRTRAN(deut,"( ", "(")
*update papworth set deut = STRTRAN(deut," )}", ")")
*update papworth set deut = STRTRAN(deut," ", " ")
*update papworth set deut = STRTRAN(deut," ", " ")
update papworth set deut = STRTRAN(deut," ;", ";")
update papworth SET deut = STRTRAN(deut,' &;',';')
RETURN
*

$file = 'C:\datei.txt'  
$clean = @()
$arr = @()
(gc $file) | %{
    if($_ -notlike '*update*'){  
        $clean += $_
    }else{
        if($_ -notin $arr){
            $clean += $_
            $arr += $_
        }else{
            if ((Read-Host "Folgende Zeile ist doppelt: '$_' . Soll sie gelöscht werden ? (j/n)") -eq 'n'){  
                $clean += $_
            }
        }
    }
}
$clean | set-content $file

Set-ExecutionPolicy RemoteSigned -Force

> Set-ExecutionPolicy RemoteSigned -Force
>