judgemstr has asked for the wisdom of the Perl Monks concerning the following question:
Hello All, I am a beginner in Perl and I am trying to write a script to help automate checking on a few freebsd servers that we maintain. I have the basics down on what needs to happen with the script but I am running into an error. I must su into another user after running a few commands and once my script hits the su command the script just pauses. Below is a copy of the script I am using right now. The end result that I am looking for is to have the script run and paste the output into one txt file that lists the results for each command for each host (39 of them).
use Net::OpenSSH; my $ssh = Net::OpenSSH->new('root@172.16.100.27', passphrase => 'blah' +, key_path => 'key.txt'); $ssh->error and die "Couldn't establish SSH connection: ". $ssh->error; $ssh->system('ifconfig em1'); $ssh->system('ifconfig -d'); $ssh->system('su - admin'); $ssh->system("show status"); $ssh->system('exit'); $ssh->system('exit');
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: OpenSSH and multiple users
by NetWallah (Canon) on Jan 04, 2016 at 19:35 UTC | |
by judgemstr (Novice) on Jan 04, 2016 at 21:51 UTC | |
by NetWallah (Canon) on Jan 04, 2016 at 22:20 UTC | |
by judgemstr (Novice) on Jan 04, 2016 at 22:46 UTC | |
by NetWallah (Canon) on Jan 05, 2016 at 04:24 UTC | |
| |
|
Re: OpenSSH and multiple users
by jcb (Parson) on Jan 05, 2016 at 03:56 UTC |