Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?
 
PerlMonks  

Re: Multilevel SSH

by salva (Canon)
on Oct 17, 2012 at 07:49 UTC ( [id://999475]=note: print w/replies, xml ) Need Help??


in reply to Multilevel SSH

You can use Net::OpenSSH and Net::OpenSSH::Gateway. The later is not on CPAN yet because I am not completely happy with its internals, but otherwise it is completely functional.

Once installed, you can run: 

my $ssh = Net::OpenSSH->new($target,
                            gateway => { proxies => ['ssh://serverA',
                                                     'ssh://serverB'] 
+});

my $output = $ssh->capture('ls');

[download]
Under the hood it uses several tricks to find a way to jump from one hop to the next, as creating tunnels or running any of socat, netcat or perl.

Replies are listed 'Best First'.
Re^2: Multilevel SSH
by grantm (Parson) on Oct 18, 2012 at 02:14 UTC
    Under the hood it uses several tricks to find a way to jump from one hop to the next, as creating tunnels or running any of socat, netcat or perl.

    I learned recently that the latest versions of OpenSSH support -W host : port to do what historically we've done with socat/netcat.

[reply]
[d/l]
      I know, I requested it :-)

      Net::OpenSSH::Gateway already supports it but -W requires port forwarding to be enabled on the server and, in my experience, that feature is frequently disabled in ssh gateways for security reasons.

[reply]
[d/l]

In Section Seekers of Perl Wisdom

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?

www.com | www.net | www.org
Node Status?
node history
Node Type: note [id://999475]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? • Last hour • Other CB clients
Other Users?
Others about the Monastery: (4)
As of 2024-04-24 02:05 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found