Hola que tal, tengo una duda que no sé hacer funcionar... tengo el siguiente código en 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 ...