Скрипт выполняющий команду на dlink des-3526

Впринципе скрипт можно заточить под что угодно

#!/usr/bin/expect
 
if {[llength $argv] != 2} {
  puts "Вызов: dlink_command <ip_address_switch> <command>"
  puts "если команда состоит из нескольких слов, то её нужно заключить в кавычки"
  exit 1
}
set hostname [lindex $argv 0]
set COMMAND [lindex $argv 1]
set prompt "DES-3526:admin#"
set password ""
 
 
package require Expect
 
spawn telnet $hostname
expect username:
send admin\r
expect password:
send $password\r
expect -exact $prompt
send "$COMMAND\r"
expect -exact $prompt
send save\r
expect -exact $prompt