Shell Programming and Scripting

#!/usr/bin/expect -- 

set running 1 
spawn telnet <ip address> 
expect  {'^]'.} 
expect "login:"    
send "admin\r"    
expect "Password:"    
send "********\r"  


set fh [open master1.txt w]    
set fh1 [open master2.txt w]  
expect "master>" 
send "show device\r"  

while $running { 
expect {      
"\n" { puts $fh "$expect_out(buffer)"}      
eof {set running 0}          
timeout {set running 0}         
}         
} 


close $fh 
puts done  

expect "master>" 
send "show status\r"  
while $running { 
expect {      
"\n" { puts $fh1 "$expect_out(buffer)"}  
eof {set running 0}      
    timeout {set running 0}       
  }       
  } 
close $fh1 
puts done    

expect -re {# $}   
exit

exp_internal 1