 Mar Jul 03, 2007 8:01 am
|
 |
perlo
Perlero Nuevo
|
Registrado: 08 Nov 2006
Mensajes: 17
|
|
| Perl y Cisco |
 |
|
Hola que tal, tengo una duda que no sé hacer funcionar... tengo el siguiente código en Perl :
| Perl: | sub reload {
my $session = Net:: Telnet:: Cisco-> new(Host => 'x.x.x.x');
$session-> login('user', 'pass');
#Enable mode
if($session-> enable("passenable")) {
@output = $session-> cmd('reload'); }
else {
warn "Can't enable: " . $session-> errmsg; } |
esta función funciona casi perfectamente porque se tranca cuando quiere hacer el reload ya que luego el programa escribe reload, espera una confirmación (enter), pero no sé hacerlo. ¿Alguien tiene alguna pista?
¡GRACIAS A TODOS! |
|
|
|
|
Mar Jul 03, 2007 8:12 am
|
|
explorer
Moderador
|
Registrado: 24 Jul 2005
Mensajes: 4086
Ubicación: Valladolid, España
|
|
|
|
Powered by phpBB © 2001, 2005 phpBB Group
|
