Re^2: Net::OpenSSH reconnect master if conn. closed

Interesting! Thank you.

I will keep that in mind. I will first experiment with a simple $ssh->check_master

Let’s say that I created a master connection this way: my $ssh = Net::OpenSSH->new(...);

Before calling a slave ssh command with open3 or capture, I will test $ssh to check if it is still connected or not, like:

$ssh = Net::OpenSSH->new(...) unless ($ssh->check_master);
$ssh->capture(...);
[download]

I will see how light or heavy on CPU this check_master function is.
EDIT: no errors and the script works fine. Killed the ssh process on the remote device to test and...
The script works, but not as expected. Seems that an ssh connection is recreated allowing the slave command to be run, but there is no more master ssh connection sticking. After first disconnect event, it reconnects each time instead of staying connected like the first time.

Comment on Re^2: Net::OpenSSH reconnect master if conn. closed Download Code

Replies are listed 'Best First'.
Re^3: Net::OpenSSH reconnect master if conn. closed by salva (Canon) on Sep 28, 2020 at 15:54 UTC
I have added a new `restart` method for reestablishing the connection to the server in Net::OpenSSH version 0.80. It is something that should have been available a long time ago, but at first it was difficult to implement, then at some point I had to revamp the code managing the master process in order to fix several others bugs making it trivial but didn't though about adding it... until I read your post today! Note that it is possible that a broken connection goes unnoticed until you actually try to use it. `wait_for_master` cheeks the local ssh master process but some kind of errors (for instance, a broken TCP connection), would go unnoticed. So to be sure you cover all the cases, you need to try running the command and if that fails, reconnect: `my $cmd = "..."; my $out = $ssh->capture({timeout => 120}, $cmd); unless (defined $out) { warn "unable to run command $cmd, retrying..."; $ssh->restart or die "Unable to restart SSH connection: " . $ssh->er +ror; $out = $ssh->capture({timeout => 120}, $cmd); unless (defined $out) { die "definitively, I can't run the command $cmd: " . $ssh->error; } }` [download] If `$cmd` does some non-atomic operation, it is a long running operation you don't want to run twice, etc., you may like to use a harmless dummy command as `"echo hello"` instead.	[reply] [d/l] [select]
Re^4: Net::OpenSSH reconnect master if conn. closed by Bolemo (Acolyte) on Sep 28, 2020 at 19:42 UTC
That is great, thank you!	[reply]