tcl Script String Operationen

[kenny (Gast)]

Hallo zusammen,

vor ca zwei Wochen kam ich mit tcl Skripten in Berührung.
Ein bereits existierendes Skript konnten ich erfolgreich erweitern.
- tcl Skript zum steuern von diversen Lasten/Messgeräten incl GUI.

An einer Stelle hänge ich leider schon ne weile :(
Ich würde gerne aus folgendem String den Filenamen löschen.
von $output_path "C:\Users\xxxxxx\Desktop\Test\Neues Textdokument.txt"
nach $output_path "C:\Users\xxxxxx\Desktop\Test\"

Gibt es hier was einfacheres, als vom Ende an jedes Zeichen was nicht 
"\" ist zu löschen?

LG

[Dussel (Gast)]

Ich bin nicht mehr sicher, ob ich das in Tcl benutzt habe, aber such mal 
nach Split oder sowas. Vielleicht war es ja da.

[Egon D. (Gast)]

kenny schrieb:

> Ich würde gerne aus folgendem String den Filenamen löschen.
> von $output_path "C:\Users\xxxxxx\Desktop\Test\Neues Textdokument.txt"
> nach $output_path "C:\Users\xxxxxx\Desktop\Test\"

 
set new_output_path [file dirname $output_path]

[Christian H. (netzwanze)]

Ich meine, das könnte mit regsub gehen. Alles was nach dem letzen Slash 
(inklusive) kommt, durch "NIX" ersetzen.

[Egon D. (Gast)]

Dussel schrieb:

> Ich bin nicht mehr sicher, ob ich das in Tcl
> benutzt habe, aber such mal nach Split oder sowas.
> Vielleicht war es ja da.

"split" gibt es; das geht auch.

"file dirname" wird intern auch nix anderes machen
als den Pfad an den Trennern in eine Liste von
Komponenten zu zerlegen, das letzte Listenelement
wegzulassen und den Rest wieder zusammenzusetzen.

[kenny (Gast)]

Egon D. schrieb:
> kenny schrieb:
>
>> Ich würde gerne aus folgendem String den Filenamen löschen.
>> von $output_path "C:\Users\xxxxxx\Desktop\Test\Neues Textdokument.txt"
>> nach $output_path "C:\Users\xxxxxx\Desktop\Test\"
>
> set new_output_path [file dirname $output_path]

Vielen Dank für Euren Input.
 set new_output_path [file dirname $output_path] passt perfekt.

[50c (Gast)]

https://wiki.tcl-lang.org/