TCL数据捕获问题-预期

TCL数据捕获问题-预期,tcl,expect,Tcl,Expect,我想知道如何使用TCL获得上一个命令的输出 我现在有以下结构: exp_send -i $spawn_id "show port-access supplicant\r" set buff "" expect -regexp {".*"} expect -regexp ".*#" {send "show port-access supplicant\r"} expect eof *此时的命令返回正确的信息,但我不知道如何将其存储到变量中 我在读关于“期待”的书,但我没能让它起作用 您

我想知道如何使用TCL获得上一个命令的输出

我现在有以下结构:

exp_send -i $spawn_id "show port-access supplicant\r"

set buff ""
expect -regexp {".*"}
    expect -regexp ".*#" {send "show port-access supplicant\r"}
expect eof
*此时的命令返回正确的信息,但我不知道如何将其存储到变量中


我在读关于“期待”的书,但我没能让它起作用

您可以使用expect缓冲区来执行此操作。完成2项匹配:

 expect -regexp ".#" {send "show port-access supplicant\r"}
 expect -regexp ".#"; #Match the prompt again after the device output returns
然后尝试:

 puts $expect_out(buffer)

嗨,这是我得到的。我得到以下输出:1234-end Client_A#-123 Client_A#我使用put“1234-$expect_out(buffer)-123”。。。我不知道为什么我没有得到正确的信息输出:端口访问请求状态请求保持身份验证启动最大端口状态时间超时时间启动端口标识1已验证60 30 30 3用户@niall byrneAll我的问题是Regex。。我正在调整参数,谢谢你给我灯光!