3

我无法让它工作，也不知道为什么。我有一行在行尾的数字之间有空格。我需要 Expect 匹配这一行并将数字和空格放入捕获组，我需要稍后在我的脚本中访问该捕获组。

示例行是：这是行 2 4 5 6

我的期望 -re 声明：期望 -re {^this\sis\sa\sline((\s\d)+$)}

然后我尝试使用 $expect_out(1,string) 访问捕获组

如果我检查http://gskinner.com/RegExr/它说匹配组 1 是“2 4 5 6”，所以我很确定模式匹配正确，我希望在 $ 中看到“2 4 5 6”期望输出（1，字符串），对吗？

但是，当我运行我的期望脚本时，我看到：

expect: does " \u001b[Js\u001b[Jt\u001b[Jr\u001b[Je\u001b[Ja\u001b[Jm\u001b[Js\u001b[J\r\n\u001b[H\u001b[J\r\n\r\n\r\n\r\this is a line 2 4 5 6\r\n\r\nSelect which option you would    like to change\r\nusing the index number: " (spawn_id exp5) match regular expression "^this\sis\sa\sline((\s\d)+$)"? Gate "this?is?a?line*"? gate=yes re=no
expect: timed out
can't read "expect_out(1,string)": no such element in array
while executing
"set streams $expect_out(1,string)"
(file "check-config" line 35)

如何将“2 4 5 6”（或“2 4 5 6”）放入一个变量中，以便稍后在我的期望脚本中使用？

另外，当我引起你的注意时，这是什么Gate=Yes re=No意思？我假设 re=No 意味着正则表达式不匹配，但是Gate在 Expect 的世界里是什么？

4

1 回答 1

4

问题是您在正则表达式中包含线^锚$。您尝试匹配的字符串显然是多行字符串，但 Tcl 的默认匹配将换行符视为常规字符。另一个复杂的因素是 Tcl 认为换行符是\n但期望\r\n用作行终止符。

如果您在正则表达式中启用换行敏感匹配并考虑回车，您可能会发现此正则表达式有效：(?n)^this\sis\sa\sline((?:\s\d)+)\r?$

测试：

$ expect <<END
spawn sh -c {echo foo; echo "this is a line 2 4 5 6"; echo bar}
exp_internal 1
expect -re {(?n)^this\sis\sa\sline((?:\s\d)+)\r?$}
END

spawn sh -c echo foo; echo "this is a line 2 4 5 6"; echo bar
Gate keeper glob pattern for '(?n)^this\sis\sa\sline((?:\s\d)+)\r?$' is 'this?is?a?line*'. Activating booster.

expect: does "" (spawn_id exp4) match regular expression "(?n)^this\sis\sa\sline((?:\s\d)+)\r?$"? Gate "this?is?a?line*"? gate=no
foo

expect: does "foo\r\n" (spawn_id exp4) match regular expression "(?n)^this\sis\sa\sline((?:\s\d)+)\r?$"? Gate "this?is?a?line*"? gate=no
this is a line 2 4 5 6
bar

expect: does "foo\r\nthis is a line 2 4 5 6\r\nbar\r\n" (spawn_id exp4) match regular expression "(?n)^this\sis\sa\sline((?:\s\d)+)\r?$"? Gate "this?is?a?line*"? gate=yes re=yes
expect: set expect_out(0,string) "this is a line 2 4 5 6\r"
expect: set expect_out(1,string) " 2 4 5 6"
expect: set expect_out(spawn_id) "exp4"
expect: set expect_out(buffer) "foo\r\nthis is a line 2 4 5 6\r"
于 2013-09-11T17:39:30.403 回答