#!/usr/bin/perl use strict; use warnings; use Net::FTP; require IO::Socket::SSL; IO::Socket::SSL->import(SSL_VERIFY_CLIENT_ONCE); my $ftp = Net::FTP->new( 'irgendeinurl', SSL_verify_mode => SSL_VERIFY_CLIENT_ONCE, );