Perl 實現遠端機器操作

1、本地機器安裝

perl的net::telnet模組（安裝方法見：

最簡單的方法是： 

yum -y install perl-net-telnet

2、遠端伺服器安裝telnet（安裝方法見：

3、本地perl指令碼：

#!/usr/bin/perl -w

use strict;

use net::telnet;

#登入資訊

#注意，$prompt是登陸後的命令提示行，如果匹配不上，指令碼將會timeout

my $password = 'webos123';

my $username = 'hduser';

my $prompt   = '/\[.+\]\$ $/';

my $host     = 'hadoopcq002';

my $cmd1     = '/usr/bin/who';

my $cmd2     = '/bin/ls -l';

# my $cmd3 = '/home/hduser/scripts/test.sh';

#連線並登入到伺服器

my $conn = new net::telnet(

timeout=>60,

prompt=>$prompt,

);$conn->open($host);

$conn->login($username,$password);

#分別執行$cmd1和$cmd2命令，並輸出結果

my @output = $conn->cmd($cmd1);

print "output:@output";

@output = $conn->cmd($cmd2);

print "output:@output";

#斷開連線

$conn->close;

遠端操作SDR實現

目標 搭建乙個sdr server，通過終端可以連線到該server對其上sdr進行操作，實現電台的遠端操作，這樣無需受到天線影響，把天線掛在太陽底下最無拍檔的地方，找個涼快地兒抱著電腦聽電台即可。客戶端 tcp 無線路由器 sdr server 1 安裝rtl sdr linux 包括樹莓派均可支...

使用perl簡單實現電腦的遠端控制

背景介紹 本人之前就職的公司網路與外界完全封閉,公司配發的是台式電腦,在有突發狀況時即使很小的事在家裡也束手無策只能到跑到公司去解決.故開發出該小工具方便在家中簡單幹一些工作.主要思路 公司郵箱系統跟外界是相通的,故可以通過郵箱進行命令的傳送及返回.由於公司郵箱使用的是m change服務,故無法使...

perl 檔案操作

perl中檔案操 基礎在perl中,提供了三種檔案控制代碼 stdin,stdout,stderr.它們可以由父程序建立的檔案或者裝置會自動開啟.一般使用open函式來建立檔案控制代碼.open函式的語法是唯讀模式時為 open filehandle,somename 其中filehandle是檔案...