bala_999:

As you were told repeatedly in the CB yesterday, your problem is that you insist on persist in using:

eval { $mov=$ssh->exec("echo $?\n","2"); }; warn $@ if $@;
[download]

instead of:

eval { $mov=$ssh->exec('echo $?\n',"2"); }; warn $@ if $@;
[download]

In the first, perl is evaluating the $? for you, so the remote machine sees something utterly different. It's seeing 'echo 0\n' instead of 'echo $?\n'. So of course you're always going to get a zero result...

...roboticus

Update: Upon rereading, the tone was harsher than intended.