String 字符串操作-从绝对文件路径获取文件名

我有一个包含文件路径的变量，我从

tk_getOpenFile

函数中获得该变量，

$file

变量如下：

/home/usr/Documents/Plugin-2-Linux.pdpk

我需要某种形式的拆分，以便只获得

Plugin-2-Linux

。请注意，路径可能并非每次都相同。因此，我需要获取最后一个

/

和

.pdpk

之间的字符串，并将其放入另一个变量中：

$filename

set filename [file rootname [file tail $file]]

文件尾

返回最后一个

/

之后的部分（不计算尾随的

/

s），以及

文件根名

最后一个

之前的部分

文件尾

返回最后一个

/

之后的部分（不计算尾随的

/

s），以及

文件根名

最后一个

之前的部分

文件尾

返回最后一个

/

之后的部分（不计算尾随的

/

s），以及

文件根名

最后一个

之前的部分

文件尾

返回最后一个

/

之后的部分（不计算尾随的

/

s），以及

文件根名

最后一个

之前的部分