expect如何实现类似read的功能？

FunBSD

expect如何实现类似read的功能？
持续读取用户的输入作为参数，执行脚本。
while :
do
  read -rp "Input \"Slot Port Number\": " slot port number
  echo $slot, $port, $number
  ......
done

FunBSD

我自己回答一下吧。示例：

1. #!/usr/bin/expect -f
   
2. 
   
3. set timeout -1
   
4. match_max 100000
   
5. 
   
6. while true {
   
7.   puts -nonewline "Input Line: "
   
8.   flush stdout
   
9.   gets stdin line
   
10.   if { $line == "q" || $line == "Q" } {
    
11.     break
    
12.   } else {
    
13.     puts "Line: $line"
    
14.     puts "Line: [lindex $line 0],[lindex $line 1],[lindex $line 2]"
    
15.   }
    
16. }
    

复制代码

FunBSD

但是还有个问题，怎么才能从spawn的程序输出获取字符串，保存到变量里？