用expect 读取一个文件中的第一行

sulin515

bash for 可以这样做实现，读出这个文件中的每行到变量i并输出：
for i in `cat serverIP.txt`;do echo $i;done
现在想用expect 读出serverIP.txt，

现在想到的是：
#!/usr/bin/expect
set filename "/expect_script/serverIP.txt"  #赋值文件到变量filename
set f [ open $filename r]    #只读方式打开文件

foreach line  ｛$f｝ {
puts stdout $line;
}
close $f

但这样出不来效果，好像是 $f 在foreach里成了常量。求指导。

jason680

回复 1# sulin515

set f [ open $filename r]

while {[gets $f line] != -1} {
  puts stdout $line;
}
   

sulin515

回复 2# jason680


set f [ open $serverlist r]
while { [ gets $f ip ] >= 0 } {
puts stdout $ip;
｝

感谢，已经测试出来了，之前因为没细看，后面半天没弄出来是因为格式没对。谢谢！