Net::FTP

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

Edited by Corion: Changed <PRE> to <CODE> tags.

When trying to install the libnet module from CPAN I always recieve the following error message with the Net::FTP test --

PERL_DL_NONLAZY=1 /usr/local/bin/perl -Iblib/arch -Iblib/lib -I/usr/lo
+cal/lib/perl5/5.6.0/i686-linux -I/usr/local/lib/perl5/5.6.0 -t
t/ftp...............NOK 1FAILED tests 1-7
        Failed 7/7 tests, 0.00% okay
t/hostname..........ok
t/nntp..............skipped test on this platform
t/ph................skipped test on this platform
t/require...........ok
t/smtp..............skipped test on this platform
Failed Test  Status Wstat Total Fail  Failed  List of failed
----------------------------------------------------------------------
+---------
t/ftp.t                       7    7 100.00%  1-7
3 tests skipped.
Failed 1/6 test scripts, 83.33% okay. 7/19 subtests failed, 63.16% oka
+y.
make: *** [test_dynamic] Error 29
[download]

I know for a fact the ftp service I am using in the test allows for anonymous connections. Any help at all would be very much appreciated.
pizond97@mio.uwosh.edu

Comment on Net::FTP Download Code

Replies are listed 'Best First'.
Re: Net::FTP by johannz (Hermit) on Jan 31, 2001 at 04:58 UTC
This snippet does not include enough information to allow anyone to troubleshoot your problem. As a start, here are some questions that you need to answer before someone could troubleshoot this issue: Were there messages before the line that started PERL_DL_NONLAZY? Have you personally logged into the ftp service you're testing against using an anonymous connection? Are you sure you've told the Net::FTP Module where to connect to? I ask the last question since a 'NOK 1' response from the t/ftp.t file says that the constructor failed. Most likely because it could not make a connection. It never even attempted to login as the 'anonymous' user. I gathered this information by looking at the t/ftp.t file: `#!./perl -w use Net::Config; use Net::FTP; unless(defined($NetConfig{ftp_testhost}) && $NetConfig{test_hosts}) { print "1..0\n"; exit 0; } my $t = 1; print "1..7\n"; $ftp = Net::FTP->new($NetConfig{ftp_testhost}, Debug => 0) or (print("not ok 1\n"), exit); printf "ok %d\n",$t++;` [download] The rest of the code snipped for brevity. I hope some of this helped and if not, post a reply answering the above questions and someone might be able to help you.	[reply] [d/l]

Replies are listed 'Best First'.

Re: Net::FTP
by johannz (Hermit) on Jan 31, 2001 at 04:58 UTC

This snippet does not include enough information to allow anyone to troubleshoot your problem. As a start, here are some questions that you need to answer before someone could troubleshoot this issue:

Were there messages before the line that started PERL_DL_NONLAZY?
Have you personally logged into the ftp service you're testing against using an anonymous connection?
Are you sure you've told the Net::FTP Module where to connect to?

I ask the last question since a 'NOK 1' response from the t/ftp.t file says that the constructor failed. Most likely because it could not make a connection. It never even attempted to login as the 'anonymous' user.

I gathered this information by looking at the t/ftp.t file:

#!./perl -w

use Net::Config;
use Net::FTP;

unless(defined($NetConfig{ftp_testhost}) && $NetConfig{test_hosts}) {
    print "1..0\n";
    exit 0;
}

my $t = 1;
print "1..7\n";

$ftp = Net::FTP->new($NetConfig{ftp_testhost}, Debug => 0)
    or (print("not ok 1\n"), exit);

printf "ok %d\n",$t++;
[download]

The rest of the code snipped for brevity.

I hope some of this helped and if not, post a reply answering the above questions and someone might be able to help you.

[reply]
[d/l]