Perl，Net :: SSH2，如何从ssh读取整个数据？

Question

我需要使用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--”提示符。 Simple Net :: OpenSSH“capture”方法同时返回整个数据：

my @dirlist = $ssh->capture('dir');

是否可以使用Net :: SSH2做同样的事情？