#!/usr/sbin/expect -f

set force_conservative 1  ;# set to 1 to force conservative mode even if
			  ;# script wasn't run conservatively originally
if {$force_conservative} {
	set send_slow {1 .1}
	proc send {ignore arg} {
		sleep .1
		exp_send -s -- $arg
	}
}

set timeout 3
spawn $env(SHELL)
match_max 100000
send -- "telnet abchostname\r"
expect
send -- "admin\r"
expect
send -- "passwd\r"
expect
send -- "configupload\r"
expect
send -- "ipaddress"
expect
send -- "\r"
expect
send -- "username\r"
expect
send -- "/home/username/brocade/abchostname.cfg\r"
expect
send -- "ftp\r"
expect
send -- "passwd\r"
expect
set Datee "[exec /usr/bin/date +%m%d%H%M%y]"
send -- "date \"$Datee\"\r"
expect
send -- "quit\r"
expect