Net::OpenSSH 模块使用实例

学习模块的最快方法就是学习实例，下面介绍Perl的Net::OpenSSH模块的使用实例，详细的说明可以参考CPAN上的介绍。

本机通过key登陆远程服务器，所以要先安装openssh，关于使用ssh公私密钥可以参考man手册。

1、连接一台远程服务器并执行命令或者脚本

#!/usr/bin/perl -w
use strict;
use Net::OpenSSH;
my $hostname = 'puppet.ygfs.com';
my $ssh = Net::OpenSSH->new( $hostname， user => 'root' );
my $cmd = 'ls -l /';
my $svn_cmd = 'bash /data/ygfs_ctrl/db_convert.sh'; #这里是在远程执行一个bash shell脚本
open LOG,">> perl_exec.log"; #记录执行日志
select LOG;
my @out = $ssh->capture( $cmd );
print "@out";
my @db_out = $ssh->capture( $svn_cmd );
print "@db_out";
close LOG;
select STDIN;

2、连接多台远程服务器，并执行命令或者脚本

#!/usr/bin/perl -w
use strict;
use Net::OpenSSH;
my @hostname = qw( #建立一个服务器列表
puppet1.ygfs.com
puppet2.ygfs.com
);
my $cmd1 = 'ls -l';
my $cmd2 = 'df -i';
for my $host ( @hostname ) {
my $ssh = Net::OpenSSH -> new( $host, timeout => 600 );
my @out = $ssh -> capture( $cmd1 );
my @space = $ssh -> capture( $cmd2 );
print @out;
print @space;
}
print "@hostname\n";

3、从参数列表读取要连接的远程服务器和要执行的命令

#!/usr/bin/perl -w
use strict;
use Net::OpenSSH;
my $hostname = $ARGV[0] || 'puppet.ygfs.com';
my $remote_cmd = $ARGV[1] || 'hostname && uname -p';
my $ssh = Net::OpenSSH -> new( $hostname );
my @exec_log = $ssh -> capture( $remote_cmd );
print @exec_log;

4、使用管道

#!/usr/bin/perl -w
use strict;
use Net::OpenSSH;
my $hostname = $ARGV[0] || '127.0.0.1';
my $ssh = Net::OpenSSH -> new( $hostname );
my @lists = $ssh -> capture( 'ls' );
print @lists;
my @lists_format = $ssh -> capture2( 'ls -hl' );
print @lists_format;
#通过pipe_out方法获取远程主机上指定文件的内容，保存到$rout句柄，并打印输出,这里可以不使用pid变量
my ( $rout,$pid ) = $ssh -> pipe_out( "cat install.log" )
#my $rout = $ssh -> pipe_out( "cat install.log" )
or die "pipe_out method failed:".$ssh -> error;
while( <$rout> ) { print }
close $rout;
#写内容到远程服务器的指定文件
my $rin = $ssh -> pipe_in( "cat >> nginx.conf" )
or die "pipe_in method failed:".$ssh -> error;
print $rin <<EOF;
server{
listen 8088;
root /data/private_web;
index index.html;
server_name private.yuanfang.com;
auto_index on;
access_log /dev/null;
error_log /dev/null;
}
EOF
close $rin;

这里只是简单的介绍了Net::OpenSSH模块怎么使用，它还有很多方法和参数，读者可以参考手册。
从上面的例子可以看到，这个模块不是并发连接到远程主机和执行命令的，所以对于要连接的对象很多的时候，耗时很长，效率很低，所以就有了Net::OpenSSH::Parallel模块，支持指定工作进程数和并发数量。下篇博文将会介绍。

Net::OpenSSH 模块使用实例相关推荐

python argparse模块_Python argparse模块应用实例解析
这篇文章主要介绍了Python argparse模块应用实例解析,文中通过示例代码介绍的非常详细,对大家的学习或者工作具有一定的参考学习价值,需要的朋友可以参考下简介 argparse是python ...
python导入json模块_Python调用json模块代码实例
本篇文章小编给大家分享一下Python调用json模块代码实例,小编觉得挺不错的,现在分享给大家供大家参考,有需要的小伙伴们可以来看看. Json是JavaScript Object Notation ...
python标准类型内建模块_Python内建模块struct实例详解
本文研究的主要是Python内建模块struct的相关内容,具体如下. Python中变量的类型只有列表.元祖.字典.集合等高级抽象类型,并没有像c中定义了位.字节.整型等底层初级类型.因为Pytho ...
python requests cookie_Python requests模块cookie实例解析
cookie并不陌生,与session一样,能够让http请求前后保持状态.与session不同之处,在于cookie数据仅保存于客户端.requests也提供了相应到方法去处理cookie. 在py ...
OpenCV非真实感渲染模块的实例(附完整代码)
OpenCV非真实感渲染模块的实例 OpenCV非真实感渲染模块的实例 OpenCV非真实感渲染模块的实例 #include "opencv2/photo.hpp" #includ ...
OpenCV:使用OpenCV无缝克隆模块的实例(附完整代码)
使用OpenCV无缝克隆模块的实例使用OpenCV无缝克隆模块的实例使用OpenCV无缝克隆模块的实例 #include <signal.h> #include "openc ...
OpenCV无缝克隆带GUI的模块的实例(附完整代码)
OpenCV无缝克隆带GUI的模块的实例 OpenCV无缝克隆带GUI的模块的实例 OpenCV无缝克隆带GUI的模块的实例 #include "opencv2/photo.hpp" ...
OpenCV无缝克隆不带GUI的模块的实例(附完整代码)
OpenCV无缝克隆不带GUI的模块的实例 OpenCV无缝克隆不带GUI的模块的实例 OpenCV无缝克隆不带GUI的模块的实例 #include "opencv2/photo.hpp&q ...
多任务 schedule python_Python3.6 Schedule 模块定时任务 (实例讲解)
Python3.6 Schedule 模块定时任务 (实例讲解) Python 是一种面向对象解释型计算机程序设计语言, 由 Guido van Rossum 于 1989 年底发明, 第一个公开发行 ...

Net::OpenSSH 模块使用实例

Net::OpenSSH 模块使用实例相关推荐

最新文章

热门文章