DO-而Expect脚本(Do-while in Expect script)

我写了下面的代码，并尝试执行它。 但我面对“无效的命令名称‘做’在执行DO {”

码：

#!/usr/bin/expect
set val 0;
set input 5;

do {
    puts "\nval = $val"
    set input [expr $input-1];
    set val [expr $val+1];
} while {input}

请让我知道解决这个问题。 请问做，而存在于Expect脚本？

Answer 1:

最简洁的答案是不。

稍长的答案是：

while true {
    puts "\nval = $val"
    incr val
    if {[incr input -1] == 0} break
}

充分讨论可以发现于Tcl维基 。

文章来源: Do-while in Expect script