Net::FTP problem

Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:

I inherited an FTP program which uses the Net::FTP package. I was running the program on perl version 5.003 with no problems. When my company upgraded to perl v5.6.1, the program fails on login to the host machine.

$ftp = new Net::FTP($host, Debug => $debug, Timeout => $timeout, Firew
+all => $firewall);

unless ($ftp) {
    #not important
}
else {
  print("Connected to $host...\n");
  if ( $ftp->login( $acct, $pwd ) {
     print("Logged in...\n");
  }
  else {
     if ( ${*$ftp}{'net_cmd_code'} >= 300 ) {
         die("Bad account and/or password.\n");
     }
  } 
}
[download]

i tried to windiff the versions of the Net::FTP between 5.003 and 5.6.1, but the differences are too many. I also tried to search for 'net_cmd_code' in both versions of FTP.pm except this did not help at all. Does someone know the difference between the versions that would cause this problem. btw, i'm running this code on winNT4 SP6. thanks, michael

Comment on Net::FTP problem Download Code

Replies are listed 'Best First'.
Re: Net::FTP problem by c-era (Curate) on Jun 05, 2002 at 17:54 UTC
Are you running ActiveState perl? If you are, you should try re-installing libnet (instructions below). I've found that most of the libnet modules don't work well out of the box from ActiveState. To install libnet: 1. run 'ppm' 2. type 'install libnet' 3. answer 'y' to when it askes you if you want to install 4. after a bit, it will ask you if you want to install again (it detected a previous version) answer yes 5. you can accept the defaults from here on out (unless you want to change something)	[reply]
Net::FTP problem by Anonymous Monk on Jun 05, 2002 at 18:04 UTC
Yes. I am running ActiveState perl and I tried to run ppm (like you said), but it said that Version 1.07 of 'libnet' is already installed. Remove it, or use 'verify --upgrade libnet' So, I tried the 'verify'. it took about a minute to run, but when i tried the ftp program again, it ended up with the same result as before. Michael	[reply]
Re: Net::FTP problem by c-era (Curate) on Jun 05, 2002 at 18:32 UTC
Can you post your code exactly? (I know this isn't it because you are missing a ')' at line 8) Also, post any errors that you are receiving. It may also help to turn on debuging to see if there is a network problem.	[reply]
Re: Re: Net::FTP problem by Marza (Vicar) on Jun 05, 2002 at 18:43 UTC
Re: Net::FTP problem by joealba (Hermit) on Jun 05, 2002 at 18:29 UTC
What are the error messages you get in Debug mode?	[reply]
Re: Re: Net::FTP problem by Anonymous Monk on Jun 05, 2002 at 19:27 UTC
Thanks for your reply/time. you guys helped me solve the problem. Setting the debug flag told me that when i was logging on to the FTP server, i was only using 'user acct' rather than 'user acct@host' thanks again, michael	[reply]


laziness, impatience, and hubris
	PerlMonks