shell - 无法在 TCL (Linux/Unix) 中使用环境变量

Question

我在尝试在 TCL 中使用环境变量时遇到了困难。

所以我有一个 shell 脚本，它导出了一堆环境变量，以便我的 TCL 脚本以后可以使用它们。

set_vars.sh中包含以下代码：

export TEST_ENV_VAR=Test

以及以下作品：

% 放 $env(TEST_ENV_VAR)

测试

但是，一旦我将环境变量放在运算符或引号中，则不会返回任何内容。

% puts "$env(TEST_ENV_VAR) 在 TEST_ENV_VAR"

在 TEST_ENV_VAR 中

有谁知道可能是什么问题？任何帮助将不胜感激。

谢谢你的时间。

Answer 1

一定有一些你没有向我们展示的东西：

$ export TEST_ENV_VAR=Test
$ tclsh
% puts $env(TEST_ENV_VAR)
Test
% puts "$env(TEST_ENV_VAR) is in TEST_ENV_VAR"
Test is in TEST_ENV_VAR

请注意，这env是一个全局变量，因此如果您在过程中使用它，则必须将其声明为global

$ tclsh
% proc show_env1 {varname} {
    puts "does not work: $env($varname)"
}
% show_env1 TEST_ENV_VAR
can't read "env(TEST_ENV_VAR)": no such variable
% proc show_env2 {varname} {
    global env
    puts "works: $env($varname)"
}
% show_env2 TEST_ENV_VAR
works: Test
% proc show_env3 {varname} {
    puts "also works: $::env($varname)"
}
% show_env3 TEST_ENV_VAR
also works: Test