gistfile1.txt

#!/usr/bin/expect
trap {
   set rows [stty rows]
   set cols [stty columns]
   stty rows $rows columns $cols < $spawn_out(slave,name)
} WINCH

set dest [lindex $argv 0];

# are we already on vpn?
spawn host ogawa.mclean.harvard.edu
expect eof
catch wait result

if { [lindex $result 3] == 1 } {
    spawn ssh -A -oStrictHostKeyChecking=no -oCheckHostIP=no -J dd328@ssh.partners.org $dest 
    set prompt ":|#|\\\$"
    interact -o -nobuffer -re $prompt return
    send "my password\r"
    interact
} else {
    spawn ssh $dest
    interact
}