, wie aus einer tcl Datei sed verwenden

Question

Ich versuche, die Unix zu verwenden „sed“ Befehlsform innerhalb einer tcl-Datei, wie folgt aus: (auf mehrere Räume zu einem Raum zu ändern)

exec /bin/sed 's/ \+/ /g' $file 

I auch versucht exec /bin/sed 's/ \\+/ /g' $file (ein extra Backslash)

keine der Version der Arbeit, und ich den Fehler

/bin/sed: -e expression #1, char 1: Unknown command: `'' 

der Befehl funktioniert gut, wenn von einem linux-Terminal laufen

Was mache ich falsch?

Answer 1

Was mache ich falsch?

Was du falsch gemacht wird mit ' (Apostroph) Zeichen. Sie sind nicht Besonderes . Tcl bei allen Das Äquivalent in Tcl ist ein Wort in { Klammern umschließt }, es gibt keine spezielle Behandlung überhaupt an den Innen Zeichen So, was Sie suchen zu tun wäre.

exec /bin/sed {s/ +/ /g} $file 

Wohlgemerkt, wenn Sie etwas komplexer und die Einschränkung von Tcl zu Voll Worte sein unquoted tun, dann könnten Sie stattdessen gehen:

exec /bin/sh -c "sed 's/ +/ /g' $file" 

Oder echte idiomatische Tcl nur doesn‘ t Einsatz für etwas dieses einfache sed:

set f [open $file] 
set replacedContents [regsub -all { +} [read $f] " "] 
close $f 

Answer 2

Verwenden exec /bin/sed "s/\ +/\ /g" $file

Die '\' sagt TCL, dass ein Raum gibt es. Auch mit dem ‚"‘konfiguriert richtig die Zeichenfolge.