Estimado, quiero ingresar una lista de acceso a mi
router y estoy ocupando el Net::Telnet::Cisco para ingresar al
router, pero la condición de trabajo es que debo ocupar un segundo módulo para realizar esto...
Trato de usar el IPDevice::CiscoRouter::Accesslist...
Este es mi programa el cual quiero que ingrese la ACL
Using perl Syntax Highlighting
#! /usr/bin/perl
use Net::Telnet;
use Net::Telnet::Cisco;
use IPDevice::CiscoRouter;
use IPDevice::CiscoRouter;Accesslist;
my $session = Net::Telnet::Cisco->new(Host => '192.168.1.1');
$session->login('cisco', 'cisco');
# Execute a command
my @output = $session->cmd('show version');
print @output;
my $acl = new IPDevice::CiscoRouter::Accesslist;
# Enable mode
if ($session->enable("cisco") ) {
@output = $session->cmd('configure terminal');
print "My privileges: @output\n";
} else {
warn "Can't enable: " . $session->errmsg;
}
$acl->set_id(10);
$acl->add_entry('permit', '192.168.0.0/22', '20', '24');
$session->close;
El telnet funciona bien, pero no logro hacer que funcione el módulo.