PDK::Connector::Radware - Radware 设备连接器

SYNOPSIS

use PDK::Connector::Radware;

# 创建 Radware 设备连接器实例
my $conn = PDK::Connector::Radware->new(
    host => '192.168.1.1',
    username => 'admin',
    password => 'password'
);

# 登录设备
$conn->login;

# 执行配置转储命令
my $config = $conn->getConfig;

# 执行自定义命令
my $result = $conn->execCommands(['show version', 'show status']);

DESCRIPTION

Radware 设备专用连接器，继承 PDK::Connector::Role 角色，提供与 Radware 网络设备的交互功能。

支持设备登录、命令执行、配置获取等操作，自动处理 Radware 设备特有的交互提示和控制字符。

ATTRIBUTES

prompt

Radware 设备命令行提示符的正则表达式模式，默认匹配 '^>>.*?#\s*$' 格式。

_enable_

特权模式状态标志，Radware 设备默认进入特权模式，值为 1。

METHODS

waitfor

my $output = $conn->waitfor($prompt);

等待设备响应，处理 Radware 设备特有的交互提示： - 配置保存确认 - FLASH 存储确认 - 信息转储确认 - 私钥显示确认 - 密码短语输入

自动清理输出中的控制字符，返回处理后的文本内容。

execCommands

my $result = $conn->execCommands(\@commands);

执行多个命令序列。自动检测命令执行错误，返回包含执行结果的结构化数据。

getConfig

my $config = $conn->getConfig;

获取设备完整配置。使用 Radware 特有的 'cfg/dump' 命令转储配置信息。

SEE ALSO

PDK::Connector::Role, Expect, Moose

AUTHOR

WENWU YAN <968828@gmail.com>

LICENSE AND COPYRIGHT

版权所有 2025 WENWU YAN。

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