linux下的ssh、telnet登入腳本(tcl)
2007-08-08 17:03
作業系統:linux(feroda4)
tcl版本:tclsh8.4
expect:5.43.0
ssh登入腳本
#!/usr/bin/tclsh8.4
package require Expect
set user "root"
set host "10.2.26.30"
spawn ssh $user@$host
expect {
-re "password: $" {exp_send "密碼\r"; exp_continue}
}
telnet登入腳本
set user "test"
set port "23"
spawn telnet $host $port
-re "login: $" {exp_send "$user\r"; exp_continue}
-re "Password: $" {exp_send "test密碼\r"}
PS:10.2.26.30為linux主機,若登入其他裝置,更改比對字元即可