在expect脚本中怎么使用循环结构

yy_galois

#!/usr/bin/expect

expect中怎么使用数组，
或者类似for in方式的循环结构。

yy_galois

具体问题是这样的。
比如有值 2 3 4 5 6
我想定义一个变量i，或者使用数组方法
使得i逐个去其中的值，比如i = 2 i =3 i = 4 i =5 i = 6

xinyv

#!/usr/bin/expect --

for {set i 1} {$i < 10} {incr i 1} {
    send_user "$i "
}

yy_galois

自力更生

foreach  ip { a  b c d e f } {
    puts "$ip"
}

用的是tcl语法，不是shell语法，日。

chinaboywg

M-H-J

回复 1# yy_galois

#!/usr/bin/expect -f

foreach ip {
192.168.0.1
192.168.1.1
192.168.1.2
} {
        puts "$ip"
}
exit

situxiaoquan1

#!/usr/bin/expect -f

foreach ip {
192.168.1.11
192.168.1.14
192.168.1.17
}
{
spawn ssh $ip
expect "login*"
send "db2inst1\r"
expect "Password:"
send "db2inst1\r"
expect "*>*"
send "cd /home/db2inst1/weihu/activemobile/sorting\r"
expect "*>*"
send "rm 1.txt\r"
expect "*>*"
send "exit\n"
expect eof
}
exit
执行后报错如下：

wrong # args: should be "foreach varList list ?varList list ...? command"
    while executing
"foreach ip {
192.168.1.11
192.168.1.14
192.168.1.17
}"

xiaopan3322

回复 2# yy_galois

1. [19:19:11-Bob@hzling20:~/test/tcl]-(1101)No.101->$ cat for
   
2. #!/usr/bin/expect --
   
3. for {set i 2} {$i < 7} {incr i} {
   
4.     puts "I inside first loop: $i"
   
5. }
   
6. 
   
7. set i 1
   
8. while {$i < 6} {
   
9.     incr i
   
10.     puts "I after incr: $i"
    
11. }
    
12. [19:19:16-Bob@hzling20:~/test/tcl]-(1102)No.102->$ ./for
    
13. I inside first loop: 2
    
14. I inside first loop: 3
    
15. I inside first loop: 4
    
16. I inside first loop: 5
    
17. I inside first loop: 6
    
18. I after incr: 2
    
19. I after incr: 3
    
20. I after incr: 4
    
21. I after incr: 5
    
22. I after incr: 6

复制代码

linenoise77

foreach ip {
192.168.1.11
192.168.1.14
192.168.1.17
}   {                              ;#    }　{　必须在同一行!!!
spawn ssh $ip
expect "login*"
send "db2inst1\r"
expect "Password:"
send "db2inst1\r"
expect "*>*"
send "cd /home/db2inst1/weihu/activemobile/sorting\r"
expect "*>*"
send "rm 1.txt\r"
expect "*>*"
send "exit\n"
expect eof
}