- 269 名前：264 mailto:sage [05/03/20 13:48:39 .net]
- >>268
書ける人なのね。
#!/usr/bin/expect --
log_user 0
spawn -noecho eblook /home/foo/dict/readers
send "select 1\r"
send "search [lindex $argv 0]\r"
expect -re "(\[0-9a-f]*:\[0-9a-f]*)" {
send "content $expect_out(0,string)\r"
send "quit\r"
}
expect "content"
expect "quit"
interact eof exit
あとはreference追うなど随意に。
