set timeout 20 # o script vai interromper a execução em 20 segundos se algo der errado
set ip [lindex $argv 0] # o primeiro argumento da linha de comando vai ser associado a variável IP
set senha [lindex $argv 1] # o segundo argumento vai ser associado a variavel senha (senha do hardware)
spawn telnet $ip # Esse comando executa o telnet e abre a conexão com o host $ip
expect "Password:" # O script espera pelo prompt "Password:", configure aqui exatamente
# o prompt que aparece para você quando abre o telnet para o hardware
send "$senha" # O script envia o conteúdo da variável senha
send "R\n" # O script envia o comando R seguido de "Enter"