https://www.opennet.ru/openforum/vsluhforumID9/9810.html Требуется помощь, есть небольшой скриптик на Perl <br><br>#!/usr/bin/perl -w<br><br>use Net::OpenSSH;<br>use strict;<br>my $ssh = Net::OpenSSH-&gt;new($user.':'.$pass.'@'.$host, timeout =&gt; 30);<br>my @ls = $ssh-&gt;capture("sh run &#124; b interface Vlan1");<br># обработка @ls<br># и формирование списка команд в @cmd<br>@ls = $ssh-&gt;capture(@cmd);<br><br><br>Первый capture срабатывает как положено, результат получаю, а вот второй capture не срабатывает <br>Вылетает вот такая ошибка<br>channel_by_id: 0: bad id: channel free<br>client_input_channel_req: channel 0: unknown channel<br>Connection to 10.40.1.225 closed by remote host.<br> https://www.opennet.ru/openforum/vsluhforumID9/9810.html#3 Fri, 10 Jan 2014 11:55:17 GMT &gt;&gt; @ls = $ssh-&gt;capture(@cmd); <br>&gt; А что в @cmd перед вызовом этой строки?<br><br>даже если заменить @cmd на "sh ver", то ошибка таже<br> https://www.opennet.ru/openforum/vsluhforumID9/9810.html#2 Fri, 10 Jan 2014 11:06:31 GMT &gt;&gt; @ls = $ssh-&gt;capture(@cmd); <br>&gt; А что в @cmd перед вызовом этой строки?<br><br>команды, которые если в ручную вставить, то исполняются без ошибок<br>вот например (print @cmd):<br>conf t<br>interface Vlan35<br>no ip helper-address 10.40.2.11<br>ip helper-address 10.40.2.98<br>end<br>wri<br><br><br> https://www.opennet.ru/openforum/vsluhforumID9/9810.html#1 Fri, 10 Jan 2014 10:44:32 GMT &gt; @ls = $ssh-&gt;capture(@cmd); <br><br>А что в @cmd перед вызовом этой строки?<br><br>