environment-variables - 如何访问 ITCL 类中的环境变量？

Question

我知道在普通的 tcl 脚本中可以像这样访问环境变量：

global env
puts "User: $env(USER)"

set env(IOFILE) "somefile.txt"

但这似乎不适用于 ITCL 类方法。如何在 ITCL 类代码中获取和设置环境变量？

Answer 1

Itcl 对变量发现做了复杂的事情，但是您可以通过提供变量的完全限定名称来覆盖这个技巧（该global命令会将本地范围内名称的最后一个组件绑定到命名变量）。因此：

global ::env  ;# <<<<<< Note this <<<<<<

puts "User: $env(USER)"
set env(FOO) "bar"