Re^3: How to open nested SSH connection using perl

And so, port forwarding is enabled in the gateway server...

use Net::OpenSSH;

my $sshA = Net::OpenSSH->new($serverA,
                             user => $userA, password => $passwordA);

my $proxy_command = $sshA->make_remote_command({tunnel => 1}, $serverB
+, 22);
my $sshB = Net::OpenSSH->new($serverB,
                             user => $userB, password => $passwordB,
                             proxy_command => $proxy_command);

$sshB->system($cmd1);
$sshB->system($cmd2);
...
[download]

Comment on Re^3: How to open nested SSH connection using perl Download Code

Replies are listed 'Best First'.
Re^4: How to open nested SSH connection using perl by Anonymous Monk on Jul 13, 2015 at 11:34 UTC
Hi, I am getting error at: `my $sshB = Net::OpenSSH->new($serverB, user => $userB, password => $passwordB, proxy_command => $proxy_command);` [download] The error is: ssh: illegal option -- W usage: ssh -1246AaCfgkMNnqsTtVvXxY -b bind_address -c cipher_spec [-D bind_address:port] -e escape_char -F configfile -i identity_file [-L bind_address:port:host:hostport] -l login_name -m mac_spec -O ctl_cmd -o option -p port [-R bind_address:port:host:hostport] -S ctl_path [-w local_tun:remote_tun] user@hostname command ssh_exchange_identification: Connection closed by remote host	[reply] [d/l]
Re^5: How to open nested SSH connection using perl by salva (Canon) on Jul 13, 2015 at 13:10 UTC
That means your version of the SSH client is too old and doesn't support the `-W` feature. Your current solution is not very elegant because others may be able to use the tunnels you are creating to get to serverB without login into serverA first.	[reply] [d/l]
Re^4: How to open nested SSH connection using perl by gjoshi (Sexton) on Jul 14, 2015 at 03:58 UTC
I am getting an error with this code -w option is not known option then we try to do `my $sshB = Net::OpenSSH->new($serverB, user => $userB, password => $passwordB, proxy_command => $proxy_command);` [download]	[reply] [d/l]
Re^5: How to open nested SSH connection using perl by salva (Canon) on Jul 14, 2015 at 07:03 UTC
is `socat` or `netcat` or some similar program installed on serverA?	[reply] [d/l] [select]