use Data::Dumper;
print Dumper([$cmd, $edr, $stderr, $?, $ssh->error]);