反斜杠的模式匹配问题

Question

我在 TCL 教程页面找到以下描述：

\X

反斜杠转义一个特殊字符，就像它在 Tcl 替换中所做的那样。使用反斜杠可以让您使用 glob 来匹配 * 或 ?。

Simple pattern matching - "globbing"

然后我有以下代码进行测试：

set list1 "1 2 3 *"
puts [lsearch $list1 *]
puts [lsearch $list1 \*]

set list2 "a b ? c"
puts [lsearch $list2 ?]
puts [lsearch $list2 \?]

但是，结果与我的预期有些不同。 所有这 4 个 puts 命令都返回索引 0，参考列表中的第一个元素。

为什么puts [lsearch $list1 \*] 和puts [lsearch $list2 \?] 不返回3 和2。我想在*和?前面加上反斜杠，这些字符就没有任何特殊含义了。

Answer 1

反斜杠也用于标准 Tcl 语法中以转义各种字符。 您需要对反斜杠进行转义，以便将其传递给lsearch 命令。

所以你需要：

set list1 "1 2 3 *"
puts [lsearch $list1 *]
puts [lsearch $list1 \\*]
puts [lsearch $list1 {\*}] ; # or this

set list2 "a b ? c"
puts [lsearch $list2 ?]
puts [lsearch $list2 \\?]
puts [lsearch $list2 {\?}]