tcl - 如何从 Expect 中的变量生成

Question

有些进程会在计算过程中接收密码。我希望在进程开始时插入一个密码，所以我试图创建一个通用的 expect 脚本来生成一个进程，然后给它一个密码。

这个期望脚本需要输入密码和产生的过程:

#!/usr/bin/expect

set timeout 120

# Get program to spawn and password to send
set pswd [lindex $argv 0]
set program [lindex $argv 1]

spawn $program

expect "Password:"
send "$pswd\r"

interact

这将从 bash 函数调用:

function vup {
    echo -n "Enter Password: "
    read -s pswd
    echo
    expectPassword.exp $pswd "vagrant up"
}

但我收到错误:

couldn't execute "vagrant up": no such file or directory
    while executing
"spawn [join $program]"

当我在没有参数的程序上使用它时，这个脚本似乎有效。但我不确定如何使它适用于具有可变数量参数的参数。

Answer 1

一种方法是使用 eval :

eval spawn $program