string - 拆分字符串并仅打印字母数字字符串中的数字

Question

我是 Tcl 的新手。我有一个特定的字符串“code_lines_part2021vol32i8mn.txt”，我只想打印格式为“2021 32 8”的数字我该怎么做？

提前致谢

标签： stringsplittcl

Answer 1

我没有旧的 Tcl 可以测试，但试试这个：

set numbers [regexp -all -inline {\d+} $string]
puts [join $numbers]