expect小程序

昨天耐了性子看了下expect的man page(主要是send,expect,interact,send_user等命令),写了个expect小程序，坑不少,tcl也是和bash写法差异蛮大的。

这个expect程序登陆本机,拿到hostname,并把hostname写到特定文件。

#!/usr/bin/expect -f


set timeout 5
spawn ssh localhost
set processed 0
expect {
  -re ^Password:$ { send wodemima\n; exp_continue; }
  -re "Last login.*\[\n\r\]+" { send "hostname\n"; exp_continue; }
  -re "hostname\[\n\r\]+" { set processed 1; exp_continue; }
  -indices -re "\[^\n\r\]+" { if {$processed == 1} { set f [open /tmp/expect_out w]; puts $f $expect_out(buffer); close $f; send_user exit\n; } exp_continue; }
}

有个录制expect脚本的autoexpect