PDK::Connector::Paloalto - Paloalto 防火墙设备连接器
SYNOPSIS
use PDK::Connector::Paloalto;
# 创建 Paloalto 设备连接器实例
my $conn = PDK::Connector::Paloalto->new(
host => '192.168.1.1',
username => 'admin',
password => 'password'
);
# 登录设备
$conn->login;
# 获取设备配置
my $config = $conn->getConfig;
# 执行自定义命令
my $result = $conn->execCommands(['show system info', 'show interface all']);
DESCRIPTION
Paloalto 防火墙设备专用连接器,继承 PDK::Connector::Role 角色,提供与 Paloalto 防火墙设备的交互功能。
支持设备登录、命令执行、配置获取等操作,自动处理 Paloalto 设备特有的交互提示、分页显示和 ANSI 控制字符。
ATTRIBUTES
prompt
Paloalto 设备命令行提示符的正则表达式模式,默认匹配包含 HA 状态(active/passive/suspended)的提示符格式。
_enable_
特权模式状态标志,Paloalto 设备默认进入特权模式,值为 1。
METHODS
waitfor
my $output = $conn->waitfor($prompt);
等待设备响应,处理 Paloalto 设备特有的交互提示: - 分页显示控制(lines X-X 格式) - 操作确认提示(are you sure?)
自动清理输出中的 ANSI 转义序列和控制字符,返回处理后的文本内容。
execCommands
my $result = $conn->execCommands(\@commands);
执行多个命令序列。自动检测 Paloalto 特有的错误消息(Error:/Unknown command/Invalid syntax),返回包含执行结果的结构化数据。
getConfig
my $config = $conn->getConfig;
获取设备完整配置。使用 Paloalto 特有的命令序列: - 禁用分页显示 - 设置配置输出格式为 set 命令格式 - 进入配置模式并显示配置
SEE ALSO
PDK::Connector::Role, Expect, Moose
AUTHOR
WENWU YAN <968828@gmail.com>
LICENSE AND COPYRIGHT
版权所有 2025 WENWU YAN。
本软件按Perl自身许可条款发布。