Имеется скрипт для захода на циску по телнету и загрузке с tftp сервера настроек для оной циски.
При работе скрипт выдает следующие.
pattern match read eof at /root/cisco_telnet.pl line 15
(15 строчка это $session->cmd('exit'); )
Сам скрипт
#!/usr/bin/perl
use warnings;
use strict;
use Data::Dumper;
use Net::Telnet::Cisco;
my $session = Net::Telnet::Cisco->new(Host => 'xx.94.0.xx2');
$session->login('nfnnnnnn', 'xxxxxxxxxxxx');
my @out = $session->cmd("copy tftp://xx.94.0.xxx/list system:/running-config\n\n\n");
$session->cmd('exit');
$session->close;
1;
Версии ПО: FreeBSD 8.2-RELEASE amd64 perl, v5.10.1 (*) built for amd64-freebsd-thread-multi Все поставлено аккуратно из портов.
P.S Сделано через телнет,ибо через ssh,почему-то очень не стабильно работает.
P.P.S Напрямую не вставляется из-за долгого времени вставки одной строки(порядка 0.5 сек) [Над этой проблемой щас бьюсь]