Select Code to Download

use Net::OpenSSH;

...
$ssh->die_on_error("unable to connect to remote host");

my ($out, $err) = $ssh->capture2(ls => '-l', $remotefile);

use Net::SFTP::Foreign;
use Data::Dumper;
...

my $attr = $sftp->stat($remotefile);
print Dumper $attr;