Я пытаюсь использовать perl's Net :: FTPSSL для подключения к хосту.Когда я запускаю скрипт, он зависает и в конечном итоге отключается в журналах ошибок, но не в браузере.Проблема, кажется, при создании нового соединения.Если я использую Filezilla для подключения, появляется пауза / ответ, предупреждающий, что ключ хоста неизвестен.Когда я одобряю это в Filezilla, он передает команду «Доверять новому Hostkey: Once», отправляет пароль и входит в систему. Если это моя проблема, как я могу отправить это «хорошо»?Вот мой код - он висит на второй строке - даже прежде, чем получить имя пользователя / пароль.
Код, который я использую:
use Net::FTPSSL;
$ftpobj = Net::FTPSSL -> new('host.com', Port => 21) or die "Can't open server.";
$ftpobj -> login("user","pass");
$ftpobj -> get ("file.csv");
$ftpobj -> quit;