Automating command line interface (CLI) interactions is not a new idea, but can be tricky to implement. Net::CLI::Interact is a Perl module that aims to provide a simple and manageable interface to CLI interactions, supporting:
- SSH, Telnet and Serial-Line connections
- Unix and Windows support
- Reuseable device command phrasebooks
SYNOPSIS
use Net::CLI::Interact;
my $s = Net::CLI::Interact->new({
personality => 'cisco',
transport => 'Telnet',
connect_options => { host => '192.0.2.1' },
});
# respond to a usename/password prompt
$s->macro('to_user_exec', {
params => ['my_username', 'my_password'],
});
my $interfaces = $s->cmd('show ip interfaces brief');
$s->macro('to_priv_exec', {
params => ['my_password'],
});
# matched prompt is updated automatically
# paged output is slurped into one response
$s->macro('show_run');
my $config = $s->last_response;
Product's homepage
Requirements:
· Perl