Tcl 如何从打开的文件中获取变量的值

我正在编写TCL脚本，它将打开另一个TCL文件，我想从第二个打开的文件中获取变量的值，并在第一个文件中使用它

两个文件abc.tcl和xyz.tcl abc.tcl打开文件xyz.tcl，读取变量的值并在abc.tcl中使用。

如果xyz.tcl设置了一个全局变量，abc.tcl将能够看到它是否使用源在xyz.tcl中加载

这里有一个简单的例子。这是xyz.tcl：

这里是abc.tcl：

source命令在内部非常简单。它只是将文件的内容读入一个字符串，然后在内部对该字符串求值。是的，这意味着您可能不应该将源代码放入过程中，至少不应该，除非您确定这样做的后果是什么

set SomeVariable 12345

source xyz.tcl
puts "The password on my luggage is $SomeVariable"