Tcl lreplace 无法替换大括号？

Question

这个代码示例应该做什么？

set l { A B C D }
lreplace $l 1 2 \[ \]

它返回 {A {[} \] D}，但是我想要 {A [ ] D}。

我做错了什么？

Answer 1

您的代码完全按照您想要的方式执行，您只是读取输出的字符串代表并误解它：

% set l { A B C D }
 A B C D 
% foreach elem $l { puts $elem }
A
B
C
D
% set j [lreplace $l 1 2 \[ \]]
A {[} \] D
% foreach elem $j { puts $elem }
A
[
]
D
% join $j
A [ ] D

当您读取字符串代表时，您会看到它转义了 [ 和 ]。正如您从 foreach 输出中看到的，实际值就是您所要求的。如果您想要的只是包含相关字符的字符串，则可以使用 join 获取您感兴趣的字符串。