How can I run a shell script on a remote machine with a local Perl program?

Question

I'm writing a Perl script that is to be run on a PC networked with a computer running Linux. The script must give input to, and receive results from, a set of shell scripts on the Linux machine. I'm able to copy the input files from the PC and even invoke a Perl script on the Linux machine, but when that script attempts to run the .sh files via:

 system("./shell_script.sh");

It prints the following error:

 '.' is not recognized as an internal or external command, operable program or batch file.

Which I take to mean it's trying to execute the .sh files under Windows. So is there any way to get the PC to tell the Linux box, "hey, buddy, run this yourself"?

Thank you.

A small bit of sample code to give some context around the system call may be useful. — Chris Simmons
– Chris Simmons, Commented Aug 31, 2009 at 21:14

brian d foy · Accepted Answer · 2009-09-01 10:05:29Z

6

You can use Net::SSH::Perl to run the commands/scripts on remote machine:

use warnings;
use strict;

use Net::SSH::Perl;

my $command = "command";
my $host = "host";
my $user = "username";
my $pass = "password";

my $ssh = Net::SSH::Perl->new( $host );
$ssh->login( $username, $pass );
my($stdout, $stderr, $exit) = $ssh->cmd( $command );

print $stdout;

edited Sep 1, 2009 at 10:05

brian d foy

134k31 gold badges214 silver badges613 bronze badges

answered Sep 1, 2009 at 5:10

Space

7,2997 gold badges51 silver badges68 bronze badges

Sign up to request clarification or add additional context in comments.

Comments

brian d foy · Accepted Answer · 2009-08-31 21:23:20Z

5

I think you want to use something like Net::SSH or Expect to login into the Linux machine and run the shell script. The system() runs on the local machine; it's not a way to send commands to a remote machine.

answered Aug 31, 2009 at 21:23

brian d foy

134k31 gold badges214 silver badges613 bronze badges

Collectives™ on Stack Overflow

How can I run a shell script on a remote machine with a local Perl program?

2 Answers 2

Comments

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

Comments

Comments

Your Answer

Sign up or log in

Post as a guest

Related