期望在 Tcl 中使用 catch 语句答案

【问题标题】：Expect with catch statement in Tcl期望在 Tcl 中使用 catch 语句
【发布时间】：2013-04-29 16:14:29
【问题描述】：

我的代码：

spawn telnet $ip
expect "Password: "
exp_send "$paswd\r"
expect "Router>"
exp_send "en\r"
expect "Password: "
exp_send "$paswd\r"
expect "Router#"
exp_send "\r"
expect "Router#"
exp_send "\r"
expect "Router#"
exp_send "\r"
expect "Router#"
exp_send "\r"
expect "Router#"
exp_send "conf t\r"
expect "Router(config)#"
exp_send "\r"
expect "Router(config)#"
exp_send "ip ftp username name\r"
expect "Router(config)#"
exp_send "ip ftp password name123\r"
expect "Router(config)#"
exp_send "end"
expect "Router#"
exp_send "\r"
expect "Router#"
exp_send "\r"
expect "Router#"
exp_send "\r"
expect "Router#"
exp_send "copy ftp: filename\r"
expect "Address or name of remote host []? "
exp_send "$remote_ip\r"
expect "Source filename []? "
exp_send "router-config1\r"
expect "Destination filename []? "
exp_send "/new/location\r"
expect "Router#"

输出：

Router(config)#ip ftp username name
Router(config)#ip ftp password name123
Router(config)#endTcpping succeeded for port 443.
Tcpping succeeded for port 443.

Router#
Router#
Router#copy ftp: filename
Address or name of remote host []? Tcpping succeeded for port 443.
Tcpping succeeded for port 443.
$remote_ip
Source filename []? Tcpping succeeded for port 443.
Tcpping succeeded for port 443.
filename
Destination filename [filename]? Tcpping succeeded for port 443.
Tcpping succeeded for port 443.
/new/location
%Warning:There is a file already existing with this name
Do you want to over write? [confirm]Tcpping succeeded for port 443.
Tcpping succeeded for port 443.

Accessing ftp://$remote_ip//filename...
%Error opening ftp://$remote_ip//router-config (No such file or directory)
Router#copy t1_working startup-config
Destination filename [startup-config]? Tcpping succeeded for port 443.

谁能告诉我如何捕捉 NO SUCH FILENAME 的异常？

【问题讨论】：

请将您的代码放在
```
 块中。它是难以辨认的。
```
@ElchononEdelson - 你不需要使用<pre> 标签；您可以使用编辑器中的{} 按钮标记代码
缩小需要帮助的部分会有很大帮助。
我需要在代码块expect "Source filename []? " exp_send "router-config1\r" expect "Destination filename []? " exp_send "/new/location\r" expect "Router#"中为{Error opening ftp://$remote_ip//router-config (No such file or directory)}添加catch语句
文字 $remote_ip?那在里面做什么？

标签： tcl expect cisco-ios

【解决方案1】：

您可以让 Expect 一次等待两个（或更多）不同的字符串。

expect {
    "Thing for success" {
         # little script to handle the success case
         puts "hooray, going to do next step"
    }
    "Thing for failure 1" {
         puts "oh dear; didn't work"
         exit 1
    }
    "Thing for failure 2" {
         send "something to try to recover\r"
         exp_continue; # Try this expect again
    }
}

当然，您需要选择合适的东西来匹配（检查使用 glob 或正则表达式匹配）并且您需要弄清楚如何实际处理错误情况（您的选择通常是“忽略”、“失败”和“尝试恢复”）。还可以考虑对超时进行显式处理。

【讨论】：