[NET] Не получается подключиться к FTPS

@miragex · Регистрация: 11.07.2012

Author24 — интернет-сервис помощи студентам

Не получается подключиться к FTPS

Perl

use Net::FTPSSL;
my $ftp = Net::FTPSSL->new($args{'host'}, 
                            Encryption => EXP_CRYPT,
                            Debug => 1, DebugLogFile => "myLog.txt",
                            Croak => 1);
 $ftp->login( $Login, $Passw ) 
            or die "Couldn't authenticate, even with explicit username and password: $!\n";

Encryption => EXP_CRYPT ==== Ошибка: connect: Connection refused at
Encryption => CLR_CRYPT ==== Ошибка: 550 The connection must be SSL-secured. Please configure your client to use explicit or implicit SSL.
Подключаюсь по FileZilla - все OK!
Подскажите пожалуйста как подключиться к FTPS в PERL для загрузки/ выгрузки файлов.
Благодарю за помощь

@ft4l · 13.09.2021, 21:33

Сообщение от miragex

550 The connection must be SSL-secured.

Может надо путь к сертификатам указывать ?

https://metacpan.org/pod/Net::FTPSSL

new( HOST [, OPTIONS ] )
...
OPTIONS are:
...
SSL_* - SSL arguments which can be applied when start_SSL() is finally called to encrypt the command channel. See IO::Socket::SSL for a list of valid arguments.

https://metacpan.org/pod/IO::Socket::SSL

Perl

    # location of CA store
    # need only be given if default store should not be used
    SSL_ca_path => '/etc/ssl/certs', # typical CA path on Linux
    SSL_ca_file => '/etc/ssl/cert.pem', # typical CA file on BSD
 
    # or just use default path on system:
    IO::Socket::SSL::default_ca(), # either explicitly
    # or implicitly by not giving SSL_ca_*

	13.09.2021, 21:33