#Automatically administering US Robotics quad card systems

#!/usr/local/bin/expect -f
log_user 0
spawn telnet tc0
expect "login:"
send "!root\r"
expect "Password:"
send "password\r"
expect "*>*"
send "sho ses\r"
log_user 1
expect {
"*for More*"    {send "\r"; exp_continue}
"*S61*"         {send "aa\r"; exp_continue}
"*>*"           {send "exit \r"}
}