tcl中的棘手的var验证

Question

根据我的输入，我有一个或不存在的变量 所以我做了一个if：

if { [info exists $var1] } {
    puts "Here we are, Born to be kings, We're the princes of the universe ..."
}

但是当我启动脚本时，我会收到错误日志：

can't read "var1": no such variable
while executing
"info exists $var1"

错误是什么？

Answer 1

使用if { [info exists var1] } {...

在调用之前替换变量，info也不例外。因此，传递变量的名称而不是它的值。