Sidehistorik

#!/usr/bin/expect
log_user 0
spawn telnet 10.0.0.110 10001
expect {
     "'^]'" { send ">>Login 32010<<\r"; }
     "refused" { catch {exp_close}; send_user "Connection refused\n";exp_wait; exit }
     "No route" { catch {exp_close}; send_user "No Route to host\n";exp_wait; exit }
     "eof" { catch {exp_close}; send_user "EOF\n";exp_wait; exit }
}
sleep .1;
send ">>Get 10604<<\r";
expect {
     ">>Get 100<<" { send ">>Set 10604 0<<\r";exp_wait; exit }
     ">>Get 0<<" { send ">>Set 10604 1<<\r";exp_wait; exit }
}
sleep .1;
send ">>Logout<<\r";
sleep .1;
close;
send_user "Success\n";
exit