$ssh = Net::OpenSSH->new($host_ip, user => $user, password => $password, master_opts => '-vv');

##</code><code>##

my @output = $ssh->capture($_);
if ($ssh->error) {
  print STDERR "capture failed: " . $ssh->error;
}
else {
  print @output, "\n";
}