如何在TCL中从键盘输入数组?

时间:2016-01-06 10:43:31

标签: tcl

while { $index < $num } {
   set arr(index) [gets stdin]
   incr index 
}

这是我的代码。在尝试输出特定的数组值时,我收到错误说:

can't read "arr(2)": no such element in array
    while executing
"puts $arr($index)"

1 个答案:

答案 0 :(得分:2)

您需要写arr($index)而不是arr(index),如

set arr($index) [gets stdin]

否则,您的所有输入都将以数组成员arr(index)而不是arr(0)arr(1)等结尾。