Tclファイル名の操作

Question

文字列に未知量の文字があります。

C:/Users/test/Desktop/folder/asd.txt

または

C:/Users/test/Desktop/newFolder/longtextname.txt

そして、私はパスだけではなく、このようなファイルを取得するために、この文字列の最後をトリミングしたい：

C:/Users/test/Desktop/folder/

を

私はすでにstring trimで試しましたが、動作しません。

set s1 "C:/Users/test/Desktop/folder/asd.txt" 
set s2 [ string trim $s1 "/*" ] 
puts "<$s1> <$s2>" 

アイデアはありますか？

Answer 1

file dirname C:/Users/test/Desktop/folder/asd.txt 

ドキュメント試してみてください：file