The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

IPDevice::CiscoRouter

SYNOPSIS

 use IPDevice::CiscoRouter;
 my $router = new IPDevice::CiscoRouter;
 $router->set_hostname('hostname');
 my $card = $router->card(0);
 my $acl  = $router->accesslist('DENYSTUPIDS');

DESCRIPTION

This module provides routines for storing informations regarding a Cisco router.

CONSTRUCTOR AND METHODS

This module provides, in addition to all methods from IPDevice::RouterBase, the following methods.

new([%args])

Object constructor. Valid arguments:

hostname: The initial router hostname.

interfacename($interfacename)

Returns the IPDevice::RouterBase::Interface with the given name. Valid names have the format 'POS1/2/3', 'Loopback0', 'Serial1/0/0:0', or just '1/2/3' etc. If the interface does not yet exist, it will be created.

accesslist($name)

Returns the IPDevice::CiscoRouter::Accesslist with the given name. If the IPDevice::CiscoRouter::Accesslist does not yet exist, it will be created.

foreach_accesslist($func, %data)

Walks through all IPDevice::CiscoRouter::Accesslist calling the function $func. Args passed to $func are:

$acl: The IPDevice::CiscoRouter::Accesslist. %data: The given data, just piped through.

If $func returns FALSE, list evaluation will be stopped.

COPYRIGHT

Copyright (c) 2004 Samuel Abels. All rights reserved.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

AUTHOR

Samuel Abels <spam debain org>