PDK::Connector::Cisco - Cisco设备专用连接器

SYNOPSIS

use PDK::Connector::Cisco;

my $cisco = PDK::Connector::Cisco->new(
    host       => '192.168.1.1',
    username   => 'admin',
    password   => 'password',
    enPassword => 'enablepass'
);

my $config = $cisco->getConfig();

DESCRIPTION

Cisco网络设备专用连接器模块,提供Cisco路由器、交换机等设备的 特殊命令支持和交互处理。

ATTRIBUTES

  • prompt: Cisco设备标准提示符

  • enPrompt: 特权模式提示符

  • enPassword: 特权模式密码

METHODS

enable()

进入Cisco设备特权模式。

waitfor($prompt)

等待设备响应,处理Cisco特有交互提示。

execCommands(\@commands)

执行多个Cisco命令。

getConfig()

获取设备配置信息。

CISCO特有功能

  • 自动处理'more'分页显示

  • 支持enable特权模式

  • 识别Cisco错误消息格式

  • 处理配置确认提示

EXAMPLES

获取设备配置

my $cisco = PDK::Connector::Cisco->new(...);
my $result = $cisco->getConfig();
if ($result->{success}) {
    print $result->{config};
}

执行Cisco命令

my $commands = [
    'show version',
    'show interface',
    'show running-config'
];
my $results = $cisco->execCommands($commands);

DIAGNOSTICS

  • 特权模式失败: 检查enable密码是否正确

  • 命令执行错误: 确认命令在设备上可用

  • 连接超时: 检查设备响应状态

AUTHOR

WENWU YAN <968828@gmail.com>

LICENSE AND COPYRIGHT

版权所有 2025 WENWU YAN。

本软件按Perl自身许可条款发布。