Показать сообщение отдельно

Perl работа с фтп - Не работает
  #1  
Старый 08.09.2009, 17:11
zer0ska
Участник форума
Регистрация: 05.12.2007
Сообщений: 113
С нами:
9701691

Репутация: 34
Unhappy Perl работа с фтп - Не работает

Задача: получить в масив листинг дерриктории на фтп.
Делаю все как по ману
http://search.cpan.org/dist/libnet/Net/FTP.pm

Код:
my $ftp = Net::FTP->new($host, Debug => 0) or print"Connect: [ERROR]\r\n";

$ftp->login($login, $password) or print"Authorisation:[ERROR]";
	$ftp->cwd();
	@q = $ftp->ls(".");
	foreach(@q) { print $_; }
	$ftp->quit;
Просто не работает =( ошибок не выводит библиотека с цпана последняя
Пробовал на различных фтп.
 
Ответить с цитированием