Expect - 如何在一个交互循环中执行多个正则表达式匹配？

Question

我试图在一个交互会话期间在同一屏幕输出上执行多个正则表达式匹配。使用以下代码，我收到错误消息：“不能多次使用 -o”

最终，我想使用几个正则表达式从每个输出屏幕中提取几个小数据变量，如这个问题。我想要做的事情是否可能，如果可以的话，正确的语法是什么？

interact {
    #...
    #... actions during interact loop to perform with variables extracted
    #...

        #variable extraction from output ------------------------------------
        -o -nobuffer -re {(\[1;14H[a-zA-Z0-9]{1})[0-9]{5}} {
                #get po number
                set poraw $interact_out(0,string)
                #get just po out
                set po [string range $poraw 6 11] 
                #switch to lowercase
                set po [string tolower $po]
                #send_user "  stored po: $po"
        }   

        #get cost from po detail
        #ex. 001b[14;27H    20.1900
        -o -nobuffer -re {(\[14\;27H)[0-9]{0-6}\.{1}[0-9]{4}} {
                set pocost $interact_out(0,string)
                send_user "  stored po cost: $pocost"
        } 
}

编辑： 所以有效的代码如下所示：

interact {
    #...

    -o
        -nobuffer -re {(\[1;14H[a-zA-Z0-9]{1})[0-9]{5}} {
                #get po number
                set poraw $interact_out(0,string)
                #get just po out
                set po [string range $poraw 6 11] 
                #switch to lowercase
                set po [string tolower $po]
        }   

        #get cost from po detail
        #ex. 001b[14;27H    20.1900
        -nobuffer -re {(\[14\;27H) *[0-9]{0,6}\.{1}[0-9]{4}} {
                set pocostraw $interact_out(0,string)
                set pocosttrim [string range $pocostraw 7 17]
                set pocost [string trimleft $pocosttrim ]
                send_user "  stored po cost: $pocost"
        } 
}

Answer 1

来自 manexpect，关于交互的部分：

-o 标志导致任何后续键体对应用于当前进程的输出。例如，当处理在 telnet 会话期间发送不需要的字符的主机时，这可能很有用。 [强调我的]

所以看起来 -o 改变了从它出现的地方到 interact 块末尾的行为。因此，它只能出现一次是有道理的。

现在解决方案很明显：将所有输出表达式放在interact末尾，并在第一个表达式之前添加-o。