NAME
Net::Autoconfig::Device::Cisco - Perl extension for provisioning or reconfiguring network devices.
SYNOPSIS
use Net::Autoconfig::Device::Cisco;
my %data = (
hostname => dev1,
username => user1,
password => pass1,
enable_password => enable1,
snmp_version => '2c',
snmp_community => 'public',
);
my $device = Net::Autoconfig::Device::Cisco->new(%data);
$device->connect();
$device->get_admin_rights();
$device->disable_paging();
$device->discover_dev_type(); # always returns Net::Autoconfig::Device::Cisco
$device->configure($config_template); # see Net::Autoconfig::Template
DESCRIPTION
This essentially only overloads the expect commands and handles some of the idiosyncrasies of Cisco devices regarding login, paging, etc.
For more information, see Net::Autoconfig::Device.
Overloaded Methods
All commands from Net::Autoconfig::Device are inhereted by this module. Some of the default Net::Autoconfig::Device commands are overloaded.
- new()
-
Create a new Net::Autoconfig::Device::Cisco object. Additional info can be configured after the object has been created. Pass an array with ( key1 => value1, key2 => value2, ...) to initialize the object with those key values.
- connect()
-
Connect to the device using the specified method, username and password
Returns: Success = undef Failure = reason why it failed (aka true)
- discover_dev_type()
-
Returns the class of the object. Useful if you want to know what the specific module/class of this device.
- get_admin_rights()
-
Gain administrative rights on this device using the specified password/credentials. In the case of Cisco devices, this uses the
enable
command. If admin access is already granted, this keeps it the same.Returns: Success = undef Failure = reason why it failed (aka true)
- disable_paging()
-
Disable paging on the terminal. I.e. make it so the switch doesn't prompt to see the next screen of output. It just writes it all to the screen.
In case you wanted to know, the Cisco command for doing this is
terminal length 0
Returns: Success = undef Failure = reason why it failed (aka true)
SEE ALSO
Net::Autoconfig, Net::Autoconfig::Device, and Net::Autoconfig::Template
AUTHOR
Kevin Ehlers <kevin@uoregon.edu>
COPYRIGHT AND LICENSE
Copyright (C) 2008 by Kevin Ehlers, University of Oregon. All rights reserved.
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.8 or, at your option, any later version of Perl 5 you may have available.
DISCLAIMER OF WARRENTY
THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM “AS IS” WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING, REPAIR OR CORRECTION.
1 POD Error
The following errors were encountered while parsing the POD:
- Around line 603:
Non-ASCII character seen before =encoding in '“AS'. Assuming UTF-8