Help for this page
use Fcntl ':mode'; ... ... } elsif (...
use Net::SFTP::Foreign; ... $sftp->error and die "unable to connect to remote host: ".$sftp->error +; $sftp->rget($remote_dir, $local_dir);