|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Dmitry Striga 2:5090/54.1 23 May 2002 13:16:30
To : All
Subject : кто-нить через прокси с фтп работал?
--------------------------------------------------------------------------------
Чего то не получается :(
вот примерчик
-+------------------------------------
use Net::FTP;
$ftp = Net::FTP->new("proxy.ru", Debug => 1);
$ftp->login('anonymous','q@q.q');
$ftp->login('name@ftp.mart.ru', 'password');
print join "\n", $ftp->ls;
...
-+-----------------------------------
а вот чего говорит
-+-----------------------------------
Net::FTP=GLOB(0x1a754f8)<<< 220 rci02w004 Microsoft FTP Service (Version 4.0).
Net::FTP=GLOB(0x1a754f8)>>> user anonymous
Net::FTP=GLOB(0x1a754f8)<<< 331 Anonymous access allowed, send identity (e-mail
name) as password.
Net::FTP=GLOB(0x1a754f8)>>> PASS ....
Net::FTP=GLOB(0x1a754f8)<<< 230 Anonymous user logged in.
Net::FTP=GLOB(0x1a754f8)>>> user name@ftp.mart.ru
Net::FTP=GLOB(0x1a754f8)<<< 331 Password required for name@ftp.mart.ru.
Net::FTP=GLOB(0x1a754f8)>>> PASS ....
Net::FTP=GLOB(0x1a754f8)<<< 530 User name@ftp.mart.ru cannot log in.
Net::FTP=GLOB(0x1a754f8)>>> PORT 10,113,1,136,10,35
Net::FTP=GLOB(0x1a754f8)<<< 200 PORT command successful.
Net::FTP=GLOB(0x1a754f8)>>> NLST
Net::FTP=GLOB(0x1a754f8)<<< 530 Please login with USER and PASS.
Net::FTP=GLOB(0x1a754f8)>>> PORT 10,113,1,136,10,36
Net::FTP=GLOB(0x1a754f8)<<< 200 PORT command successful.
Net::FTP=GLOB(0x1a754f8)>>> RETR after.jpg
Net::FTP=GLOB(0x1a754f8)<<< 530 Please login with USER and PASS.
Net::FTP=GLOB(0x1a754f8)>>> QUIT
Net::FTP=GLOB(0x1a754f8)<<< 221
-+---------------------------------------------
паролик проверил на много рядов :(
Dmitry den@slava.scn.ru
Thursday May 23 2002, 14:16
--- GoldED/W32 3.00.Beta3 UNREG
* Origin: * И это пройдет * (FidoNet 2:5090/54.1)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
