Posted to tcl by mjanssen at Tue Jun 24 15:28:16 GMT 2008view pretty
#!/usr/bin/expect -f exp_log_user 0 spawn ssh [lindex $argv 0] [lindex $argv 2] set password [lindex $argv 1] expect { "Password:" { send "$password\r" ; exp_continue} eof {puts $expect_out(buffer); exit} }