删除Tcl命令中的文件路径和扩展名

Question

说文件路径保存为变量f

puts "$f"

然后结果是

/home/usr/testfile.txt

我想删除除名称'testfile'之外的所有内容并将其保存在新变量中.

Answer 1

该文件的命令是你想要的.

 set fbasename [file rootname [file tail $f]]

file tail是文件名的最后一个组件.文件根名称是除扩展名之外的所有内容.