use Net::OpenSSH; my $ssh = Net::OpenSSH->new($remotehost, user => $remoteuser, password => $remotepassword); $ssh->die_on_error("unable to connect to remote host"); my ($out, $err) = $ssh->capture2(ls => '-l', $remotefile);