Я пытаюсь загрузить файлы с удаленного сервера MFT, используя Perl Strawberry, но я не получаю вывод или ошибку на экране. Я использую Strawberry PERL на компьютере с Windows.
Я пытался использовать модуль Net :: SFTP :: Foreign, но не смог решить проблему.
use strict;
use warnings;
use File::Slurp qw(read_file write_file);
use Getopt::Long;
use Log::Log4perl qw(:easy);
use Net::SFTP::Foreign;
use Net::SFTP::Foreign::Backend::Net_SSH2;
my $sftp = Net::SFTP::Foreign->new($host,
backend => 'Net_SSH2',
username => $user,
password => $pass);
$sftp->error and
die "Unable to stablish SFTP connection: ". $sftp->error;
my $ls = $sftp->ls("$MFTDIR");
print $ls;
Я ожидаю увидетьсписок файлов на сервере для начала. Но это ничего не показывает. Следующим шагом будет загрузка файлов.