Hello,
Take a look at Net::OpenSSH or other cpan ssh modules.
It is not exactly what do you want to do (perl will running in this case in your computer and not in remote), but I hope it helps.
It can be useful in many environments, like:
See this example which is like a first attemp to solve your problem (cat script.pl | perl thisexample user@host parameters):
#!/usr/bin/perl -w use strict; use Net::OpenSSH; my $ssh = Net::OpenSSH->new($ARGV[0]); $ssh->error and die "Couldn't establish SSH connection: ". $ssh->error; shift; my (@args)=@_; shift while (@ARGV!=0); my $command=""; while (<>) { $command.=$_; } $ssh->system("perl - <<EOS @args $command; EOS ");
For solve this specific issue, I prefer the response that Anonymous monk give you before (Re^2: run perl script with cmd line in shell), it is clearest.
Regards,In reply to Re: run perl script with cmd line in shell
by i5513
in thread run perl script with cmd line in shell
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |