Perl, Net::SSH2, как прочитать все данные из SSH?
Мне нужно прочитать вывод программы, используя Net::SSH2. Моя проблема в том, что некоторые данные скрыты в нижней части вывода программы. В ssh-режиме мне нужно ввести "Return" на клавиатуре, чтобы посмотреть дальше. Это неудобно для использования в perl-script =). Я знаю, что Net::OpenSSH делает это хорошо, но мне действительно нужно использовать Net::SSH2. Кто-нибудь знает, как я могу получить это? Thnx!
UPD: немного кода ниже
my $ch = $ssh2->channel();
$ch->blocking(0);
$ch->shell();
print $ch "dir\n";
print $_ while <$ch>;
В этом коде я печатаю вывод команды с подсказкой "--More--" терминала внизу. Простой метод захвата Net::OpenSSH возвращает целые данные одновременно:
my @dirlist = $ssh->capture('dir');
Можно ли сделать то же самое, используя Net::SSH2?