Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things
 
PerlMonks  

Re^10: Advice on running perl program over ssh

by Amblikai (Scribe)
on Jul 16, 2014 at 11:43 UTC ( [id://1093851]=note: print w/replies, xml ) Need Help??


in reply to Re^9: Advice on running perl program over ssh
in thread Advice on running perl program over ssh

Ok Thanks very much Salva

I have it working, however I now have a new problem it seems!

I have it working for normal commands such as ls, cd etc. But how do i read stdin to execute a local script as described above?

The following doesn't work:

$ssh->system("tcsh < script1.tcsh") or die "Remote command failed: ".£ +ssh->error;

It appears to be looking for "script1.tcsh" on the remote machine which is not what i want.

Also, how would i get more that one script to run in parallel?

Thanks for your help, it's very much appreciated!

Replies are listed 'Best First'.
Re^11: Advice on running perl program over ssh
by salva (Canon) on Jul 16, 2014 at 14:42 UTC
    $ssh->system({ stdin_file => 'script1.tcsh' }, 'tcsh') or die "Remote command failed: " . $ssh->error;

    Running things in parallel is not so easy. You have the spawn method that returns a PID, then you use perl built-ins as waitpid on the PID to wait for the remote process to finish.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://1093851]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others learning in the Monastery: (1)
As of 2024-04-19 00:06 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found