Ожидание соответствия шаблону Tcl

Question

Я новичок в Expect и Tcl. Я пишу код, используя ожидать в Tcl, чтобы соответствовать шаблону в одиночку (т.е. без картины будучи подстрока в данной строке) .Code приводится ниже:

package require Expect 
expect "^hi$" { send "pattern matched" }; # hi is the pattern to be matched 

Но код не обнаруживает привет. Если код изменен, как показано ниже это работает, когда образец приходит в первой части строки

package require Expect 
expect "^hi" { send "pattern matched" } 

Если код изменен, как показано ниже, она не работает, несмотря на то, что, как ожидается, чтобы соответствовать образцу в конец строки

package require Expect 
expect "hi$" { send "pattern matched" } 

Я делаю что-то неправильно? Пожалуйста, помогите

Answer 1

Это действительно немного загадочно.

$ - конец строкового якоря, и похоже, что конец линии захватывается до конца строки. Имея это в виду, вы можете сделать это с:

expect "Hi\n$" { puts "Wow" } 

Имейте в виду, что \n работает на Linux, но, возможно, не на других типах консоли!

Answer 2

Есть несколько вещей, которые могут пойти не так, но вариант, скорее всего, состоит в том, что после текста, который вы ожидаете, есть какие-то дополнительные пробелы; Expect видит всех персонажей, а не только печатных. Это может быть пространство, это может быть новая черта. Если вы знаете, что это такое, добавьте это в то, что вы ожидаете. В противном случае вам потребуется более сложное регулярное выражение:

# RE in braces because of the backslash; \s matches *ALL* types of whitespace 
expect {^hi\s*$} 
send "found it!" 

Другой вариант - переключить режимы соответствия RE. Ожидать работает в режиме полного буфера по умолчанию (это единственный разумный вариант в самых сложных ситуациях), но вы можете поместить его в линию, ориентированных на:

# The ‘n’ is mnemonically for Newline-aware 
expect {(?n)^hi$} 
send "found it!"