Net::SSH2是libssh2 (http://www.libssh2.org)函数库的一个接口，支持SSH2协议。两种使用方法如下：
方法一：
perl
$chan2 = $ssh2->channel();
$chan2->blocking(0);
print $chan2 "tail -5 /var/log/authlogn";
print "**$_" while ;方法二：
perl
#shell use
my $chan2 = $ssh2->channel();
$chan2->shell();
print $chan2 "uname -an";
print "LINE : $_" while <$chan2>;
print $chan2 "whon";
print "LINE : $_" while <$chan2>;
$chan2->close;
评论
0评论加载中…