一种方法是使用splitwith _作为分隔符,并lindex选择你想要的作品.
set inputData "7.32.56R_Znada.iso"
set wantedValue [lindex [split $inputData "_"] end]
Run Code Online (Sandbox Code Playgroud)
或者您可以使用正则表达式匹配.
regexp {.*_(.+)} $inputData -> wantedValue
Run Code Online (Sandbox Code Playgroud)