О себе События Портфолио Статьи Гостевая Фотоальбом На злобу дня Ссылки Учеба Программы
Alex_K (г.Киров) - Алексей Кощеев
Хостинг и регистрация доменов в Кирове

Интересные решения Perl. Вопросы и ответы

Как с помощью Perl закачать файл по FTP?

Используйте модуль Net::FTP.

use Net::FTP;

my $ftpServer = 'someFTPServer.tld';
my $ftpLogin  = 'someLogin';
my $ftpPass    = 'somePassword';

my $ftp = Net::FTP->new($ftpServer, Timeout => 60, 
    Debug => 1, Passive => 1) or die "Can't connect to ftp server.\n";
$ftp->login($ftpLogin, $ftpPass) || die "Can't login to ftp server.\n";
$ftp->cwd('/') or die "Path / not found on ftp server.\n";
$ftp->binary();
# кладем файл на ftp-сервер
$ftp->put('/path/to/localFile', 'remoteFile');
$ftp->quit();

Опубликовано: 29 октября 2005 года.

Комментарии посетителей сайта

Андрей    17.07.2010 10:28
  К сожалению, модуль Net::FTP не позволяет ограничить скорость передачи данных. Как быть?

Ответ: 17.07.2010 19:11
Можно воспользоваться модулем Net::FTP::Throttle

Далее: Как с помощью Perl разбить какой-либо файл на несколько файлов?
Предыдущий вопрос:Как работать с CIDR записью IP адресов в Perl?
Перейти к списку вопросов
Fanshop.ru

Рейтинг@Mail.ru

Rambler's Top100

© Алексей Кощеев, г.Киров, 2001-2019 хостинг предоставлен компанией Айхэд