Hi, I have a question about Net::FTP. It would be appreciated if anyone would my question.
My question is.. I would like to know if ithere is a bug that when I use the PASSIVE-mode of Net::Ftp and a timeout occurs, there isn't any response and my program ends with no Log? (I'm not sure if it occurs in PORT-mode) The circumstance of my question is below. ==when it goes without any problem== ClientSvr% test.pl Net::FTP>>> Net::FTP(2.75) Net::FTP>>> Exporter(5.58) Net::FTP>>> Net::Cmd(2.26) Net::FTP>>> IO::Socket::INET(1.28) Net::FTP>>> IO::Socket(1.28) Net::FTP>>> IO::Handle(1.24) Net::FTP=GLOB(0x228d54)<<< 220 cosmos FTP server (SunOS 5.8) ready. *** new OK Net::FTP=GLOB(0x228d54)>>> user guest Net::FTP=GLOB(0x228d54)<<< 331 Password required for tpmon. Net::FTP=GLOB(0x228d54)>>> PASS .... Net::FTP=GLOB(0x228d54)<<< 230 User tpmon logged in. *** login OK Net::FTP=GLOB(0x228d54)>>> TYPE A Net::FTP=GLOB(0x228d54)<<< 200 Type set to A. *** ascii OK Net::FTP=GLOB(0x228d54)>>> CWD /tmp/ Net::FTP=GLOB(0x228d54)<<< 250 CWD command successful. *** cwd OK Net::FTP=GLOB(0x228d54)>>> PASV Net::FTP=GLOB(0x228d54)<<< 227 Entering Passive Mode (XXX.XXX.XXX.XXX,YYY,18) Net::FTP=GLOB(0x228d54)>>> NLST Net::FTP=GLOB(0x228d54)<<< 150 ASCII data connection for /bin/ls (YYY.YYY.YYY.YYY,36628) (0 bytes). Net::FTP=GLOB(0x228d54)<<< 226 ASCII Transfer complete. *** ls OK ------------------------ ps_data ------------------------ shi ------------------------ ups_data ------------------------ Net::FTP=GLOB(0x228d54)>>> QUIT Net::FTP=GLOB(0x228d54)<<< 221 Goodbye. ==when it end with Timeout== ClientSvr% test.pl Net::FTP>>> Net::FTP(2.75) Net::FTP>>> Exporter(5.58) Net::FTP>>> Net::Cmd(2.26) Net::FTP>>> IO::Socket::INET(1.28) Net::FTP>>> IO::Socket(1.28) Net::FTP>>> IO::Handle(1.24) Net::FTP=GLOB(0x228d84)<<< 220 cosmos FTP server (SunOS 5.8) ready. *** new OK Net::FTP=GLOB(0x228d84)>>> user guest Net::FTP=GLOB(0x228d84)<<< 331 Password required for tpmon. Net::FTP=GLOB(0x228d84)>>> PASS .... Net::FTP=GLOB(0x228d84)<<< 230 User tpmon logged in. *** login OK Net::FTP=GLOB(0x228d84)>>> TYPE A Net::FTP=GLOB(0x228d84)<<< 200 Type set to A. *** ascii OK Net::FTP=GLOB(0x228d84)>>> CWD /etc Net::FTP=GLOB(0x228d84)<<< 250 CWD command successful. *** cwd OK Net::FTP=GLOB(0x228d84)>>> PASV Net::FTP=GLOB(0x228d84)<<< 227 Entering Passive Mode (XXX,XXX,XXX,XXX,YYY,21) Net::FTP=GLOB(0x228d84)>>> NLST Net::FTP=GLOB(0x228d84)<<< 150 ASCII data connection for /bin/ls (YYY.YYY.YYY.YYY,36643) (0 bytes). Timeout at /usr/local/lib/perl5/5.8.7/Net/FTP.pm line 1001 // Debug Mode : on // "***" indicates output from test.pl "Timeout at /usr/local/lib/perl5/5.8.7/Net/FTP.pm line 1001" means there is no response to test.pl. If anyone needs more information about it let me know it. Thanks for your help in advance. Sincerely, Hisatomo
