如何访问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"