Tcl：匹配反斜杠的字符串

Question

如何匹配Tcl中的反斜杠\？我做了以下事情：

% set a "\\"
\
% string length $a
1
% string match $a "\\"
0
% string match "\\" "\\"
0
% string match $a \\
0
% string match $a [set x "\\"]
0

但如上所述，他们都没有帮助。我想匹配$a。

Answer 1

如果你看一下＆＃34;反斜杠模式结尾＆＃34; string match documentation中的部分，它说：

A pattern ending in a backslash doesn't match a string ending in a backslash. Bug?
string match a\\ a\\
# -> 0

使用string equal可以正常工作：

% string equal $a "\\"
1

Answer 2

匹配的正确方法是

string match {[\]} \\
# => 1
string match {a[\]} a\\
# => 1

文档：string

（注意：评论中提及的＆＃39; Hoodiecrow＆＃39;是我，我之前使用过那个昵称。）