如何在不添加空格的情况下在TCL中连接字符串

Question

我想连接两个字符串，在连接的字符串之间没有任何空格。 但是当我使用下面的命令时，我会得到与它们之间添加的空格连接的字符串。如何在不添加空格的情况下连接字符串？

set A "Test"
set B "data"

set C $A$B

当前输出：

Test       data

我需要与此类似的输出：

Testdata

Answer 1

如果我尝试这样做，它就像这样：

$ tclsh
% set A "Test"
Test
% set B "data"
data
% set C $A$B
Testdata

你是不是意外地在A和$之间输入了一些控制字符？

Answer 2

尝试使用追加命令

追加的

语法是

append var "," $value 
                        #appends value to variable

不指定引号，默认值为空

所以

  set A "Test"
  set B "data"
  append A $B
  puts "$A"

变量包含“ Testdata”

Answer 3

您可以使用Tcl命令join。

% set A "Test"
Test
% set B "data"
data
% join [list $A $B] ""
Testdata