Checking if your kit is complete... Looks good Writing Makefile for Net::FTP::Common Important Notes! --------------- Net::FTP::Common is built on top of, and requires, Net::FTP. Net::FTP is available from the libnet distribution on CPAN. Please visit http://kobsearch.cpan.org or http://search.cpan.org to obtain libnet and install that before installing Net::FTP::Common. The libnet@lists.perl.org mailing list deals with Net::FTP and the people there are relatively helpful. Another source is comp.lang.perl.modules. A final source is www.perlmonks.org. An even more final source is me, but I am not a Net::FTP expert, so don't expect miracles. But of course for any issues with Net::FTP::Common, contact me immediately please - tbone@cpan.org or through the mailing list: net-ftp-common@yahoogroups.com. Note: 'make test' will only work if you have correctly installed Net::FTP to connect to FTP sites on the open internet. The test suite makes FTP connects to ftp.fcc.fov and fedworld.gov so if your installation of Net::FTP cannot connect there, then this suite will fail. Common reasons for Net::FTP being unable to make such FTP connections are * if you are firewalled and have not configured Net::FTP to negotiate your type of firewall (it handles everyone I have ever encounted quite well). * if you aren't currently connected to the internet. Installation ------------ 1- make 2- make test 3- make install Mailing List ------------ Post message:net-ftp-common@yahoogroups.com Subscribe: net-ftp-common-subscribe@yahoogroups.com Unsubscribe: net-ftp-common-unsubscribe@yahoogroups.com List owner (moi): net-ftp-common-owner@yahoogroups.com cp lib/Net/FTP/Common.pm blib/lib/Net/FTP/Common.pm cp lib/TestConfig.pm blib/lib/TestConfig.pm Manifying blib/man3/Net::FTP::Common.3 PERL_DL_NONLAZY=1 /home/cpanrun/parisc2.0-lp64/build/5.8.2/bin/perl "-MExtUtils::Command::MM" "-e" "test_harness(1, 'blib/lib', 'blib/arch')" t/*.t t/0-login....1..1 # Running under perl version 5.008002 for hpux # Current time local: Tue Oct 30 07:42:03 2007 # Current time GMT: Tue Oct 30 14:42:03 2007 # Using Test.pm version 1.24 Net::FTP::Common::VERSION = 6.1 at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 50. Using version 6.1 at t/0-login.t line 30. Net::FTP>>> Net::FTP(2.72) Net::FTP>>> Exporter(5.567) Net::FTP>>> Net::Cmd(2.24) Net::FTP>>> IO::Socket::INET(1.27) Net::FTP>>> IO::Socket(1.28) Net::FTP>>> IO::Handle(1.23) Net::FTP=GLOB(0x80000001004d33e0)<<< 220 Welcome to mirrors.kernel.org. Net::FTP=GLOB(0x80000001004d33e0)>>> user anonymous Net::FTP=GLOB(0x80000001004d33e0)<<< 331 Please specify the password. Net::FTP=GLOB(0x80000001004d33e0)>>> PASS .... Net::FTP=GLOB(0x80000001004d33e0)<<< 230- Welcome to the mirror archives of the Net::FTP=GLOB(0x80000001004d33e0)<<< 230- LINUX KERNEL ARCHIVES Net::FTP=GLOB(0x80000001004d33e0)<<< 230- mirrors.kernel.org Net::FTP=GLOB(0x80000001004d33e0)<<< 230- Net::FTP=GLOB(0x80000001004d33e0)<<< 230-This site contains mirrors of other archives. If you are looking for Net::FTP=GLOB(0x80000001004d33e0)<<< 230- the Linux Kernel Archives, please go to ftp.kernel.org instead. Net::FTP=GLOB(0x80000001004d33e0)<<< 230- Net::FTP=GLOB(0x80000001004d33e0)<<< 230- IF YOU'RE ACCESSING THIS SITE VIA A WEB BROWSER Net::FTP=GLOB(0x80000001004d33e0)<<< 230- PLEASE USE THE HTTP URL BELOW INSTEAD! Net::FTP=GLOB(0x80000001004d33e0)<<< 230- Net::FTP=GLOB(0x80000001004d33e0)<<< 230-This site is provided as a public service by the Kernel Dot Org Net::FTP=GLOB(0x80000001004d33e0)<<< 230-Organization, Inc. Bandwidth is provided by The Internet Software Net::FTP=GLOB(0x80000001004d33e0)<<< 230-Consortium, Inc. This server is located in San Francisco, California, Net::FTP=GLOB(0x80000001004d33e0)<<< 230-USA; use in violation of any applicable laws strictly prohibited. Net::FTP=GLOB(0x80000001004d33e0)<<< 230- Net::FTP=GLOB(0x80000001004d33e0)<<< 230-Due to U.S. Exports Regulations, all cryptographic software on this Net::FTP=GLOB(0x80000001004d33e0)<<< 230-site is subject to the following legal notice: Net::FTP=GLOB(0x80000001004d33e0)<<< 230- Net::FTP=GLOB(0x80000001004d33e0)<<< 230- This site includes publicly available encryption source code Net::FTP=GLOB(0x80000001004d33e0)<<< 230- which, together with object code resulting from the compiling of Net::FTP=GLOB(0x80000001004d33e0)<<< 230- publicly available source code, may be exported from the United Net::FTP=GLOB(0x80000001004d33e0)<<< 230- States under License Exception "TSU" pursuant to 15 C.F.R. Section Net::FTP=GLOB(0x80000001004d33e0)<<< 230- 740.13(e). Net::FTP=GLOB(0x80000001004d33e0)<<< 230- Net::FTP=GLOB(0x80000001004d33e0)<<< 230-This legal notice applies to cryptographic software only. Please see Net::FTP=GLOB(0x80000001004d33e0)<<< 230-the Bureau of Export Administration (http://www.bxa.doc.gov/) for more Net::FTP=GLOB(0x80000001004d33e0)<<< 230-information about current U.S. regulations. Net::FTP=GLOB(0x80000001004d33e0)<<< 230- Net::FTP=GLOB(0x80000001004d33e0)<<< 230-Neither the Kernel Dot Org Organization, Inc. nor its sponsors make no Net::FTP=GLOB(0x80000001004d33e0)<<< 230-guarantees, explicit or implicit, about the contents of this site. Net::FTP=GLOB(0x80000001004d33e0)<<< 230-Use at your own risk. Net::FTP=GLOB(0x80000001004d33e0)<<< 230- Net::FTP=GLOB(0x80000001004d33e0)<<< 230-This site is accessible via the following mechanisms: Net::FTP=GLOB(0x80000001004d33e0)<<< 230- Net::FTP=GLOB(0x80000001004d33e0)<<< 230- FTP ftp://mirrors.kernel.org/ Net::FTP=GLOB(0x80000001004d33e0)<<< 230- HTTP http://mirrors.kernel.org/ Net::FTP=GLOB(0x80000001004d33e0)<<< 230- RSYNC rsync://mirrors.kernel.org/mirrors/ Net::FTP=GLOB(0x80000001004d33e0)<<< 230- Net::FTP=GLOB(0x80000001004d33e0)<<< 230-For comments on this site, please contact . Net::FTP=GLOB(0x80000001004d33e0)<<< 230-Please do not use this address for questions that are not related to Net::FTP=GLOB(0x80000001004d33e0)<<< 230-the operation of this site. Please see our homepage at Net::FTP=GLOB(0x80000001004d33e0)<<< 230-http://www.kernel.org/ for links to Linux documentation resources. Net::FTP=GLOB(0x80000001004d33e0)<<< 230- Net::FTP=GLOB(0x80000001004d33e0)<<< 230 Login successful. ok 1 ok t/dir........1..1 # Running under perl version 5.008002 for hpux # Current time local: Tue Oct 30 07:42:04 2007 # Current time GMT: Tue Oct 30 14:42:04 2007 # Using Test.pm version 1.24 Net::FTP::Common::VERSION = 6.1 at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 50. Net::FTP>>> Net::FTP(2.72) Net::FTP>>> Exporter(5.567) Net::FTP>>> Net::Cmd(2.24) Net::FTP>>> IO::Socket::INET(1.27) Net::FTP>>> IO::Socket(1.28) Net::FTP>>> IO::Handle(1.23) Net::FTP=GLOB(0x80000001004d3080)<<< 220 Welcome to mirrors.kernel.org. Net::FTP=GLOB(0x80000001004d3080)>>> user anonymous Net::FTP=GLOB(0x80000001004d3080)<<< 331 Please specify the password. Net::FTP=GLOB(0x80000001004d3080)>>> PASS .... Net::FTP=GLOB(0x80000001004d3080)<<< 230- Welcome to the mirror archives of the Net::FTP=GLOB(0x80000001004d3080)<<< 230- LINUX KERNEL ARCHIVES Net::FTP=GLOB(0x80000001004d3080)<<< 230- mirrors.kernel.org Net::FTP=GLOB(0x80000001004d3080)<<< 230- Net::FTP=GLOB(0x80000001004d3080)<<< 230-This site contains mirrors of other archives. If you are looking for Net::FTP=GLOB(0x80000001004d3080)<<< 230- the Linux Kernel Archives, please go to ftp.kernel.org instead. Net::FTP=GLOB(0x80000001004d3080)<<< 230- Net::FTP=GLOB(0x80000001004d3080)<<< 230- IF YOU'RE ACCESSING THIS SITE VIA A WEB BROWSER Net::FTP=GLOB(0x80000001004d3080)<<< 230- PLEASE USE THE HTTP URL BELOW INSTEAD! Net::FTP=GLOB(0x80000001004d3080)<<< 230- Net::FTP=GLOB(0x80000001004d3080)<<< 230-This site is provided as a public service by the Kernel Dot Org Net::FTP=GLOB(0x80000001004d3080)<<< 230-Organization, Inc. Bandwidth is provided by The Internet Software Net::FTP=GLOB(0x80000001004d3080)<<< 230-Consortium, Inc. This server is located in San Francisco, California, Net::FTP=GLOB(0x80000001004d3080)<<< 230-USA; use in violation of any applicable laws strictly prohibited. Net::FTP=GLOB(0x80000001004d3080)<<< 230- Net::FTP=GLOB(0x80000001004d3080)<<< 230-Due to U.S. Exports Regulations, all cryptographic software on this Net::FTP=GLOB(0x80000001004d3080)<<< 230-site is subject to the following legal notice: Net::FTP=GLOB(0x80000001004d3080)<<< 230- Net::FTP=GLOB(0x80000001004d3080)<<< 230- This site includes publicly available encryption source code Net::FTP=GLOB(0x80000001004d3080)<<< 230- which, together with object code resulting from the compiling of Net::FTP=GLOB(0x80000001004d3080)<<< 230- publicly available source code, may be exported from the United Net::FTP=GLOB(0x80000001004d3080)<<< 230- States under License Exception "TSU" pursuant to 15 C.F.R. Section Net::FTP=GLOB(0x80000001004d3080)<<< 230- 740.13(e). Net::FTP=GLOB(0x80000001004d3080)<<< 230- Net::FTP=GLOB(0x80000001004d3080)<<< 230-This legal notice applies to cryptographic software only. Please see Net::FTP=GLOB(0x80000001004d3080)<<< 230-the Bureau of Export Administration (http://www.bxa.doc.gov/) for more Net::FTP=GLOB(0x80000001004d3080)<<< 230-information about current U.S. regulations. Net::FTP=GLOB(0x80000001004d3080)<<< 230- Net::FTP=GLOB(0x80000001004d3080)<<< 230-Neither the Kernel Dot Org Organization, Inc. nor its sponsors make no Net::FTP=GLOB(0x80000001004d3080)<<< 230-guarantees, explicit or implicit, about the contents of this site. Net::FTP=GLOB(0x80000001004d3080)<<< 230-Use at your own risk. Net::FTP=GLOB(0x80000001004d3080)<<< 230- Net::FTP=GLOB(0x80000001004d3080)<<< 230-This site is accessible via the following mechanisms: Net::FTP=GLOB(0x80000001004d3080)<<< 230- Net::FTP=GLOB(0x80000001004d3080)<<< 230- FTP ftp://mirrors.kernel.org/ Net::FTP=GLOB(0x80000001004d3080)<<< 230- HTTP http://mirrors.kernel.org/ Net::FTP=GLOB(0x80000001004d3080)<<< 230- RSYNC rsync://mirrors.kernel.org/mirrors/ Net::FTP=GLOB(0x80000001004d3080)<<< 230- Net::FTP=GLOB(0x80000001004d3080)<<< 230-For comments on this site, please contact . Net::FTP=GLOB(0x80000001004d3080)<<< 230-Please do not use this address for questions that are not related to Net::FTP=GLOB(0x80000001004d3080)<<< 230-the operation of this site. Please see our homepage at Net::FTP=GLOB(0x80000001004d3080)<<< 230-http://www.kernel.org/ for links to Linux documentation resources. Net::FTP=GLOB(0x80000001004d3080)<<< 230- Net::FTP=GLOB(0x80000001004d3080)<<< 230 Login successful. Net::FTP=GLOB(0x80000001004d3080)>>> CWD /debian Net::FTP=GLOB(0x80000001004d3080)<<< 250 Directory successfully changed. Net::FTP=GLOB(0x80000001004d3080)>>> TYPE I Net::FTP=GLOB(0x80000001004d3080)<<< 200 Switching to Binary mode. Net::FTP=GLOB(0x80000001004d3080)>>> PASV Net::FTP=GLOB(0x80000001004d3080)<<< 227 Entering Passive Mode (204,152,191,7,229,151) Net::FTP=GLOB(0x80000001004d3080)>>> LIST Net::FTP=GLOB(0x80000001004d3080)<<< 150 Here comes the directory listing. Net::FTP=GLOB(0x80000001004d3080)<<< 226 Directory send OK. input-line: -rw-r--r-- 1 400 400 1064 Aug 15 22:51 README at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 212. Use of uninitialized value in concatenation (.) or string at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 246. my -rw-r--r-- = -rw-r--r--; my 1 = 1; my 400 = 400; my 400 = 400; my 1064 = 1064; my Aug = Aug; my 15 = 15; my 22:51 = 22:51; my README = README; my ; regexp-matches for (README): $VAR1 = \{ 'owner' => '400', 'month' => 'Aug', 'linkTarget' => undef, 'inode' => '1', 'size' => '1064', 'group' => '400', 'yearOrTime' => '22:51', 'day' => '15', 'perm' => '-rw-r--r--' }; input-line: -rw-r--r-- 1 400 400 1290 Dec 04 2000 README.CD-manufacture at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 212. Use of uninitialized value in concatenation (.) or string at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 246. my -rw-r--r-- = -rw-r--r--; my 1 = 1; my 400 = 400; my 400 = 400; my 1290 = 1290; my Dec = Dec; my 04 = 04; my 2000 = 2000; my README.CD-manufacture = README.CD-manufacture; my ; regexp-matches for (README.CD-manufacture): $VAR1 = \{ 'owner' => '400', 'month' => 'Dec', 'linkTarget' => undef, 'inode' => '1', 'size' => '1290', 'group' => '400', 'yearOrTime' => '2000', 'day' => '04', 'perm' => '-rw-r--r--' }; input-line: -rw-r--r-- 1 400 400 3006 Aug 15 22:51 README.html at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 212. Use of uninitialized value in concatenation (.) or string at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 246. my -rw-r--r-- = -rw-r--r--; my 1 = 1; my 400 = 400; my 400 = 400; my 3006 = 3006; my Aug = Aug; my 15 = 15; my 22:51 = 22:51; my README.html = README.html; my ; regexp-matches for (README.html): $VAR1 = \{ 'owner' => '400', 'month' => 'Aug', 'linkTarget' => undef, 'inode' => '1', 'size' => '3006', 'group' => '400', 'yearOrTime' => '22:51', 'day' => '15', 'perm' => '-rw-r--r--' }; input-line: -rw-r--r-- 1 400 400 100686 Oct 29 19:56 README.mirrors.html at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 212. Use of uninitialized value in concatenation (.) or string at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 246. my -rw-r--r-- = -rw-r--r--; my 1 = 1; my 400 = 400; my 400 = 400; my 100686 = 100686; my Oct = Oct; my 29 = 29; my 19:56 = 19:56; my README.mirrors.html = README.mirrors.html; my ; regexp-matches for (README.mirrors.html): $VAR1 = \{ 'owner' => '400', 'month' => 'Oct', 'linkTarget' => undef, 'inode' => '1', 'size' => '100686', 'group' => '400', 'yearOrTime' => '19:56', 'day' => '29', 'perm' => '-rw-r--r--' }; input-line: -rw-r--r-- 1 400 400 63288 Oct 29 19:56 README.mirrors.txt at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 212. Use of uninitialized value in concatenation (.) or string at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 246. my -rw-r--r-- = -rw-r--r--; my 1 = 1; my 400 = 400; my 400 = 400; my 63288 = 63288; my Oct = Oct; my 29 = 29; my 19:56 = 19:56; my README.mirrors.txt = README.mirrors.txt; my ; regexp-matches for (README.mirrors.txt): $VAR1 = \{ 'owner' => '400', 'month' => 'Oct', 'linkTarget' => undef, 'inode' => '1', 'size' => '63288', 'group' => '400', 'yearOrTime' => '19:56', 'day' => '29', 'perm' => '-rw-r--r--' }; input-line: -rw-r--r-- 1 400 400 12876 Oct 29 19:56 README.non-US at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 212. Use of uninitialized value in concatenation (.) or string at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 246. my -rw-r--r-- = -rw-r--r--; my 1 = 1; my 400 = 400; my 400 = 400; my 12876 = 12876; my Oct = Oct; my 29 = 29; my 19:56 = 19:56; my README.non-US = README.non-US; my ; regexp-matches for (README.non-US): $VAR1 = \{ 'owner' => '400', 'month' => 'Oct', 'linkTarget' => undef, 'inode' => '1', 'size' => '12876', 'group' => '400', 'yearOrTime' => '19:56', 'day' => '29', 'perm' => '-rw-r--r--' }; input-line: lrwxrwxrwx 1 400 400 13 Mar 09 2007 README.pgp -> README.non-US at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 212. Use of uninitialized value in concatenation (.) or string at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 246. my lrwxrwxrwx = lrwxrwxrwx; my 1 = 1; my 400 = 400; my 400 = 400; my 13 = 13; my Mar = Mar; my 09 = 09; my 2007 = 2007; my README.pgp -> README.non-US = README.pgp -> README.non-US; my ; regexp-matches for (README.pgp -> README.non-US): $VAR1 = \{ 'owner' => '400', 'month' => 'Mar', 'linkTarget' => undef, 'inode' => '1', 'size' => '13', 'group' => '400', 'yearOrTime' => '2007', 'day' => '09', 'perm' => 'lrwxrwxrwx' }; input-line: drwxr-sr-x 11 400 400 4096 Aug 15 22:52 dists at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 212. Use of uninitialized value in concatenation (.) or string at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 246. my drwxr-sr-x = drwxr-sr-x; my 11 = 11; my 400 = 400; my 400 = 400; my 4096 = 4096; my Aug = Aug; my 15 = 15; my 22:52 = 22:52; my dists = dists; my ; regexp-matches for (dists): $VAR1 = \{ 'owner' => '400', 'month' => 'Aug', 'linkTarget' => undef, 'inode' => '11', 'size' => '4096', 'group' => '400', 'yearOrTime' => '22:52', 'day' => '15', 'perm' => 'drwxr-sr-x' }; input-line: drwxr-sr-x 3 400 400 4096 Oct 30 07:56 doc at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 212. Use of uninitialized value in concatenation (.) or string at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 246. my drwxr-sr-x = drwxr-sr-x; my 3 = 3; my 400 = 400; my 400 = 400; my 4096 = 4096; my Oct = Oct; my 30 = 30; my 07:56 = 07:56; my doc = doc; my ; regexp-matches for (doc): $VAR1 = \{ 'owner' => '400', 'month' => 'Oct', 'linkTarget' => undef, 'inode' => '3', 'size' => '4096', 'group' => '400', 'yearOrTime' => '07:56', 'day' => '30', 'perm' => 'drwxr-sr-x' }; input-line: drwxr-sr-x 3 400 400 4096 Oct 30 08:27 indices at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 212. Use of uninitialized value in concatenation (.) or string at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 246. my drwxr-sr-x = drwxr-sr-x; my 3 = 3; my 400 = 400; my 400 = 400; my 4096 = 4096; my Oct = Oct; my 30 = 30; my 08:27 = 08:27; my indices = indices; my ; regexp-matches for (indices): $VAR1 = \{ 'owner' => '400', 'month' => 'Oct', 'linkTarget' => undef, 'inode' => '3', 'size' => '4096', 'group' => '400', 'yearOrTime' => '08:27', 'day' => '30', 'perm' => 'drwxr-sr-x' }; input-line: -rw-r--r-- 1 400 400 5077622 Oct 30 08:28 ls-lR.gz at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 212. Use of uninitialized value in concatenation (.) or string at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 246. my -rw-r--r-- = -rw-r--r--; my 1 = 1; my 400 = 400; my 400 = 400; my 5077622 = 5077622; my Oct = Oct; my 30 = 30; my 08:28 = 08:28; my ls-lR.gz = ls-lR.gz; my ; regexp-matches for (ls-lR.gz): $VAR1 = \{ 'owner' => '400', 'month' => 'Oct', 'linkTarget' => undef, 'inode' => '1', 'size' => '5077622', 'group' => '400', 'yearOrTime' => '08:28', 'day' => '30', 'perm' => '-rw-r--r--' }; input-line: -rw-r--r-- 1 400 400 181558 Oct 30 08:28 ls-lR.patch.gz at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 212. Use of uninitialized value in concatenation (.) or string at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 246. my -rw-r--r-- = -rw-r--r--; my 1 = 1; my 400 = 400; my 400 = 400; my 181558 = 181558; my Oct = Oct; my 30 = 30; my 08:28 = 08:28; my ls-lR.patch.gz = ls-lR.patch.gz; my ; regexp-matches for (ls-lR.patch.gz): $VAR1 = \{ 'owner' => '400', 'month' => 'Oct', 'linkTarget' => undef, 'inode' => '1', 'size' => '181558', 'group' => '400', 'yearOrTime' => '08:28', 'day' => '30', 'perm' => '-rw-r--r--' }; input-line: drwxr-sr-x 5 400 400 46 Dec 19 2000 pool at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 212. Use of uninitialized value in concatenation (.) or string at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 246. my drwxr-sr-x = drwxr-sr-x; my 5 = 5; my 400 = 400; my 400 = 400; my 46 = 46; my Dec = Dec; my 19 = 19; my 2000 = 2000; my pool = pool; my ; regexp-matches for (pool): $VAR1 = \{ 'owner' => '400', 'month' => 'Dec', 'linkTarget' => undef, 'inode' => '5', 'size' => '46', 'group' => '400', 'yearOrTime' => '2000', 'day' => '19', 'perm' => 'drwxr-sr-x' }; input-line: drwxr-sr-x 4 400 400 48 Jan 02 2007 project at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 212. Use of uninitialized value in concatenation (.) or string at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 246. my drwxr-sr-x = drwxr-sr-x; my 4 = 4; my 400 = 400; my 400 = 400; my 48 = 48; my Jan = Jan; my 02 = 02; my 2007 = 2007; my project = project; my ; regexp-matches for (project): $VAR1 = \{ 'owner' => '400', 'month' => 'Jan', 'linkTarget' => undef, 'inode' => '4', 'size' => '48', 'group' => '400', 'yearOrTime' => '2007', 'day' => '02', 'perm' => 'drwxr-sr-x' }; input-line: drwxr-sr-x 3 400 400 4096 Sep 12 2002 tools at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 212. Use of uninitialized value in concatenation (.) or string at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 246. my drwxr-sr-x = drwxr-sr-x; my 3 = 3; my 400 = 400; my 400 = 400; my 4096 = 4096; my Sep = Sep; my 12 = 12; my 2002 = 2002; my tools = tools; my ; regexp-matches for (tools): $VAR1 = \{ 'owner' => '400', 'month' => 'Sep', 'linkTarget' => undef, 'inode' => '3', 'size' => '4096', 'group' => '400', 'yearOrTime' => '2002', 'day' => '12', 'perm' => 'drwxr-sr-x' }; NEW_DIR ...$VAR1 = { 'README.pgp -> README.non-US' => { 'owner' => '400', 'month' => 'Mar', 'linkTarget' => undef, 'inode' => '1', 'size' => '13', 'group' => '400', 'yearOrTime' => '2007', 'day' => '09', 'perm' => 'lrwxrwxrwx' }, 'README.html' => { 'owner' => '400', 'month' => 'Aug', 'linkTarget' => undef, 'inode' => '1', 'size' => '3006', 'group' => '400', 'yearOrTime' => '22:51', 'day' => '15', 'perm' => '-rw-r--r--' }, 'ls-lR.gz' => { 'owner' => '400', 'month' => 'Oct', 'linkTarget' => undef, 'inode' => '1', 'size' => '5077622', 'group' => '400', 'yearOrTime' => '08:28', 'day' => '30', 'perm' => '-rw-r--r--' }, 'README.CD-manufacture' => { 'owner' => '400', 'month' => 'Dec', 'linkTarget' => undef, 'inode' => '1', 'size' => '1290', 'group' => '400', 'yearOrTime' => '2000', 'day' => '04', 'perm' => '-rw-r--r--' }, 'project' => { 'owner' => '400', 'month' => 'Jan', 'linkTarget' => undef, 'inode' => '4', 'size' => '48', 'group' => '400', 'yearOrTime' => '2007', 'day' => '02', 'perm' => 'drwxr-sr-x' }, 'tools' => { 'owner' => '400', 'month' => 'Sep', 'linkTarget' => undef, 'inode' => '3', 'size' => '4096', 'group' => '400', 'yearOrTime' => '2002', 'day' => '12', 'perm' => 'drwxr-sr-x' }, 'README.mirrors.html' => { 'owner' => '400', 'month' => 'Oct', 'linkTarget' => undef, 'inode' => '1', 'size' => '100686', 'group' => '400', 'yearOrTime' => '19:56', 'day' => '29', 'perm' => '-rw-r--r--' }, 'README.non-US' => { 'owner' => '400', 'month' => 'Oct', 'linkTarget' => undef, 'inode' => '1', 'size' => '12876', 'group' => '400', 'yearOrTime' => '19:56', 'day' => '29', 'perm' => '-rw-r--r--' }, 'pool' => { 'owner' => '400', 'month' => 'Dec', 'linkTarget' => undef, 'inode' => '5', 'size' => '46', 'group' => '400', 'yearOrTime' => '2000', 'day' => '19', 'perm' => 'drwxr-sr-x' }, 'doc' => { 'owner' => '400', 'month' => 'Oct', 'linkTarget' => undef, 'inode' => '3', 'size' => '4096', 'group' => '400', 'yearOrTime' => '07:56', 'day' => '30', 'perm' => 'drwxr-sr-x' }, 'dists' => { 'owner' => '400', 'month' => 'Aug', 'linkTarget' => undef, 'inode' => '11', 'size' => '4096', 'group' => '400', 'yearOrTime' => '22:52', 'day' => '15', 'perm' => 'drwxr-sr-x' }, 'indices' => { 'owner' => '400', 'month' => 'Oct', 'linkTarget' => undef, 'inode' => '3', 'size' => '4096', 'group' => '400', 'yearOrTime' => '08:27', 'day' => '30', 'perm' => 'drwxr-sr-x' }, 'README.mirrors.txt' => { 'owner' => '400', 'month' => 'Oct', 'linkTarget' => undef, 'inode' => '1', 'size' => '63288', 'group' => '400', 'yearOrTime' => '19:56', 'day' => '29', 'perm' => '-rw-r--r--' }, 'README' => { 'owner' => '400', 'month' => 'Aug', 'linkTarget' => undef, 'inode' => '1', 'size' => '1064', 'group' => '400', 'yearOrTime' => '22:51', 'day' => '15', 'perm' => '-rw-r--r--' }, 'ls-lR.patch.gz' => { 'owner' => '400', 'month' => 'Oct', 'linkTarget' => undef, 'inode' => '1', 'size' => '181558', 'group' => '400', 'yearOrTime' => '08:28', 'day' => '30', 'perm' => '-rw-r--r--' } }; # Test 1 got: 'drwxr-sr-x' (t/dir.t at line 29) # Expected: 'drwxrwsr-x' # t/dir.t line 29 is: ok($retval{dists}{perm}, 'drwxrwsr-x'); not ok 1 FAILED test 1 Failed 1/1 tests, 0.00% okay t/grep.......1..2 # Running under perl version 5.008002 for hpux # Current time local: Tue Oct 30 07:42:05 2007 # Current time GMT: Tue Oct 30 14:42:05 2007 # Using Test.pm version 1.24 $common = { 'Type' => 'I', 'RemoteDir' => '/debian', 'User' => 'anonymous', 'Pass' => 'tbone@cpan.org', 'Host' => 'ftp.us.debian.org' }; $netftp = { 'Debug' => 1, 'Timeout' => 120 }; Net::FTP::Common::VERSION = 6.1 at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 50. Net::FTP>>> Net::FTP(2.72) Net::FTP>>> Exporter(5.567) Net::FTP>>> Net::Cmd(2.24) Net::FTP>>> IO::Socket::INET(1.27) Net::FTP>>> IO::Socket(1.28) Net::FTP>>> IO::Handle(1.23) Net::FTP=GLOB(0x80000001000f0e20)<<< 220---------------------------------------------------------------------------- Net::FTP=GLOB(0x80000001000f0e20)<<< 220- F T P . O S U O S L . O R G Net::FTP=GLOB(0x80000001000f0e20)<<< 220- Oregon State University Net::FTP=GLOB(0x80000001000f0e20)<<< 220- Open Source Lab Net::FTP=GLOB(0x80000001000f0e20)<<< 220- Net::FTP=GLOB(0x80000001000f0e20)<<< 220- Unauthorized use is prohibited - violators will be prosecuted Net::FTP=GLOB(0x80000001000f0e20)<<< 220---------------------------------------------------------------------------- Net::FTP=GLOB(0x80000001000f0e20)<<< 220- Net::FTP=GLOB(0x80000001000f0e20)<<< 220- For more information on our services visit: Net::FTP=GLOB(0x80000001000f0e20)<<< 220- http://osuosl.org/hosting/ Net::FTP=GLOB(0x80000001000f0e20)<<< 220- Net::FTP=GLOB(0x80000001000f0e20)<<< 220- We offer these particular files simply because users Net::FTP=GLOB(0x80000001000f0e20)<<< 220- have asked for them. If you would like another archive offered Net::FTP=GLOB(0x80000001000f0e20)<<< 220- here on this ftp mirror, please ask support@osuosl.org Net::FTP=GLOB(0x80000001000f0e20)<<< 220- Net::FTP=GLOB(0x80000001000f0e20)<<< 220- Questions/Comments/Suggestions/Concerns - support@osuosl.org Net::FTP=GLOB(0x80000001000f0e20)<<< 220- Net::FTP=GLOB(0x80000001000f0e20)<<< 220---------------------------------------------------------------------------- Net::FTP=GLOB(0x80000001000f0e20)<<< 220 Net::FTP=GLOB(0x80000001000f0e20)>>> user anonymous Net::FTP=GLOB(0x80000001000f0e20)<<< 331 Please specify the password. Net::FTP=GLOB(0x80000001000f0e20)>>> PASS .... Net::FTP=GLOB(0x80000001000f0e20)<<< 230 Login successful. Net::FTP=GLOB(0x80000001000f0e20)>>> CWD /debian Net::FTP=GLOB(0x80000001000f0e20)<<< 250 Directory successfully changed. Net::FTP=GLOB(0x80000001000f0e20)>>> TYPE I Net::FTP=GLOB(0x80000001000f0e20)<<< 200 Switching to Binary mode. Net::FTP=GLOB(0x80000001000f0e20)>>> PASV Net::FTP=GLOB(0x80000001000f0e20)<<< 227 Entering Passive Mode (64,50,238,52,93,88) Net::FTP=GLOB(0x80000001000f0e20)>>> NLST Net::FTP=GLOB(0x80000001000f0e20)<<< 150 Here comes the directory listing. Net::FTP=GLOB(0x80000001000f0e20)<<< 226 Directory send OK. GREP RETVAL: README README.CD-manufacture README.html README.mirrors.html README.mirrors.txt README.non-US README.pgp at t/grep.t line 28. ok 1 Net::FTP=GLOB(0x800000010052d5f8)<<< 220---------------------------------------------------------------------------- Net::FTP=GLOB(0x800000010052d5f8)<<< 220- F T P . O S U O S L . O R G Net::FTP=GLOB(0x800000010052d5f8)<<< 220- Oregon State University Net::FTP=GLOB(0x800000010052d5f8)<<< 220- Open Source Lab Net::FTP=GLOB(0x800000010052d5f8)<<< 220- Net::FTP=GLOB(0x800000010052d5f8)<<< 220- Unauthorized use is prohibited - violators will be prosecuted Net::FTP=GLOB(0x800000010052d5f8)<<< 220---------------------------------------------------------------------------- Net::FTP=GLOB(0x800000010052d5f8)<<< 220- Net::FTP=GLOB(0x800000010052d5f8)<<< 220- For more information on our services visit: Net::FTP=GLOB(0x800000010052d5f8)<<< 220- http://osuosl.org/hosting/ Net::FTP=GLOB(0x800000010052d5f8)<<< 220- Net::FTP=GLOB(0x800000010052d5f8)<<< 220- We offer these particular files simply because users Net::FTP=GLOB(0x800000010052d5f8)<<< 220- have asked for them. If you would like another archive offered Net::FTP=GLOB(0x800000010052d5f8)<<< 220- here on this ftp mirror, please ask support@osuosl.org Net::FTP=GLOB(0x800000010052d5f8)<<< 220- Net::FTP=GLOB(0x800000010052d5f8)<<< 220- Questions/Comments/Suggestions/Concerns - support@osuosl.org Net::FTP=GLOB(0x800000010052d5f8)<<< 220- Net::FTP=GLOB(0x800000010052d5f8)<<< 220---------------------------------------------------------------------------- Net::FTP=GLOB(0x800000010052d5f8)<<< 220 Net::FTP=GLOB(0x800000010052d5f8)>>> user anonymous Net::FTP=GLOB(0x800000010052d5f8)<<< 331 Please specify the password. Net::FTP=GLOB(0x800000010052d5f8)>>> PASS .... Net::FTP=GLOB(0x800000010052d5f8)<<< 230 Login successful. Net::FTP=GLOB(0x800000010052d5f8)>>> CWD /debian Net::FTP=GLOB(0x800000010052d5f8)<<< 250 Directory successfully changed. Net::FTP=GLOB(0x800000010052d5f8)>>> TYPE I Net::FTP=GLOB(0x800000010052d5f8)<<< 200 Switching to Binary mode. Net::FTP=GLOB(0x800000010052d5f8)>>> PASV Net::FTP=GLOB(0x800000010052d5f8)<<< 227 Entering Passive Mode (64,50,236,52,156,203) Net::FTP=GLOB(0x800000010052d5f8)>>> NLST Net::FTP=GLOB(0x800000010052d5f8)<<< 150 Here comes the directory listing. Net::FTP=GLOB(0x800000010052d5f8)<<< 226 Directory send OK. [checking README README.CD-manufacture README.html README.mirrors.html README.mirrors.txt README.non-US README.pgp dists doc indices ls-lR.gz ls-lR.patch.gz pool project tools for [dists]] at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 298. ok 2 ok t/xfer.......1..3 # Running under perl version 5.008002 for hpux # Current time local: Tue Oct 30 07:42:07 2007 # Current time GMT: Tue Oct 30 14:42:07 2007 # Using Test.pm version 1.24 $common = { 'Type' => 'I', 'RemoteDir' => '/debian', 'User' => 'anonymous', 'Pass' => 'tbone@cpan.org', 'Host' => 'ftp.us.debian.org' }; $netftp = { 'Debug' => 1, 'Timeout' => 120 }; Net::FTP::Common::VERSION = 6.1 at /home/cpanrun/depot/main/contrib-patched/perl/CPAN/src/Net-FTP-Common/blib/lib/Net/FTP/Common.pm line 50. Net::FTP>>> Net::FTP(2.72) Net::FTP>>> Exporter(5.567) Net::FTP>>> Net::Cmd(2.24) Net::FTP>>> IO::Socket::INET(1.27) Net::FTP>>> IO::Socket(1.28) Net::FTP>>> IO::Handle(1.23) Net::FTP=GLOB(0x8000000100037a78)<<< 220 ftp.ddj.com FTP server (BSDI Version 7.00LS) ready. Net::FTP=GLOB(0x8000000100037a78)>>> user anonymous Net::FTP=GLOB(0x8000000100037a78)<<< 331 Guest login ok, send your email address as password. Net::FTP=GLOB(0x8000000100037a78)>>> PASS .... Net::FTP=GLOB(0x8000000100037a78)<<< 230 Guest login ok, access restrictions apply. Net::FTP=GLOB(0x8000000100037a78)>>> CWD / Net::FTP=GLOB(0x8000000100037a78)<<< 250- Net::FTP=GLOB(0x8000000100037a78)<<< 250- ******************************************************************* Net::FTP=GLOB(0x8000000100037a78)<<< 250- * * Net::FTP=GLOB(0x8000000100037a78)<<< 250- * DDJ files and material are available at * Net::FTP=GLOB(0x8000000100037a78)<<< 250- * http://www.ddj.com/ * Net::FTP=GLOB(0x8000000100037a78)<<< 250- * * Net::FTP=GLOB(0x8000000100037a78)<<< 250- * please go there for access * Net::FTP=GLOB(0x8000000100037a78)<<< 250- * * Net::FTP=GLOB(0x8000000100037a78)<<< 250- * Questions may be addressed to editors@ddj.com * Net::FTP=GLOB(0x8000000100037a78)<<< 250- * * Net::FTP=GLOB(0x8000000100037a78)<<< 250- * Thanks! * Net::FTP=GLOB(0x8000000100037a78)<<< 250- * * Net::FTP=GLOB(0x8000000100037a78)<<< 250- ******************************************************************* Net::FTP=GLOB(0x8000000100037a78)<<< 250- Net::FTP=GLOB(0x8000000100037a78)<<< 250- Net::FTP=GLOB(0x8000000100037a78)<<< 250 CWD command successful. Net::FTP=GLOB(0x8000000100037a78)>>> TYPE I Net::FTP=GLOB(0x8000000100037a78)<<< 200 Type set to I. Net::FTP=GLOB(0x8000000100037a78)>>> PASV Net::FTP=GLOB(0x8000000100037a78)<<< 227 Entering Passive Mode (199,125,85,76,218,131) Net::FTP=GLOB(0x8000000100037a78)>>> RETR README Net::FTP=GLOB(0x8000000100037a78)<<< 150 Opening BINARY mode data connection for 'README' (867 bytes). Net::FTP=GLOB(0x8000000100037a78)<<< 226 Transfer complete. ok 1 Net::FTP=GLOB(0x800000010050f1b0)<<< 220 ftp.ddj.com FTP server (BSDI Version 7.00LS) ready. Net::FTP=GLOB(0x800000010050f1b0)>>> user anonymous Net::FTP=GLOB(0x800000010050f1b0)<<< 331 Guest login ok, send your email address as password. Net::FTP=GLOB(0x800000010050f1b0)>>> PASS .... Net::FTP=GLOB(0x800000010050f1b0)<<< 230 Guest login ok, access restrictions apply. Net::FTP=GLOB(0x800000010050f1b0)>>> CWD / Net::FTP=GLOB(0x800000010050f1b0)<<< 250- Net::FTP=GLOB(0x800000010050f1b0)<<< 250- ******************************************************************* Net::FTP=GLOB(0x800000010050f1b0)<<< 250- * * Net::FTP=GLOB(0x800000010050f1b0)<<< 250- * DDJ files and material are available at * Net::FTP=GLOB(0x800000010050f1b0)<<< 250- * http://www.ddj.com/ * Net::FTP=GLOB(0x800000010050f1b0)<<< 250- * * Net::FTP=GLOB(0x800000010050f1b0)<<< 250- * please go there for access * Net::FTP=GLOB(0x800000010050f1b0)<<< 250- * * Net::FTP=GLOB(0x800000010050f1b0)<<< 250- * Questions may be addressed to editors@ddj.com * Net::FTP=GLOB(0x800000010050f1b0)<<< 250- * * Net::FTP=GLOB(0x800000010050f1b0)<<< 250- * Thanks! * Net::FTP=GLOB(0x800000010050f1b0)<<< 250- * * Net::FTP=GLOB(0x800000010050f1b0)<<< 250- ******************************************************************* Net::FTP=GLOB(0x800000010050f1b0)<<< 250- Net::FTP=GLOB(0x800000010050f1b0)<<< 250- Net::FTP=GLOB(0x800000010050f1b0)<<< 250 CWD command successful. Net::FTP=GLOB(0x800000010050f1b0)>>> TYPE I Net::FTP=GLOB(0x800000010050f1b0)<<< 200 Type set to I. Net::FTP=GLOB(0x800000010050f1b0)>>> PASV Net::FTP=GLOB(0x800000010050f1b0)<<< 227 Entering Passive Mode (199,125,85,76,218,132) Net::FTP=GLOB(0x800000010050f1b0)>>> RETR README Net::FTP=GLOB(0x800000010050f1b0)<<< 150 Opening BINARY mode data connection for 'README' (867 bytes). Net::FTP=GLOB(0x800000010050f1b0)<<< 226 Transfer complete. ok 2 Net::FTP=GLOB(0x800000010050f270)<<< 220 ftp.ddj.com FTP server (BSDI Version 7.00LS) ready. Net::FTP=GLOB(0x800000010050f270)>>> user anonymous Net::FTP=GLOB(0x800000010050f270)<<< 331 Guest login ok, send your email address as password. Net::FTP=GLOB(0x800000010050f270)>>> PASS .... Net::FTP=GLOB(0x800000010050f270)<<< 230 Guest login ok, access restrictions apply. Net::FTP=GLOB(0x800000010050f270)>>> CWD / Net::FTP=GLOB(0x800000010050f270)<<< 250- Net::FTP=GLOB(0x800000010050f270)<<< 250- ******************************************************************* Net::FTP=GLOB(0x800000010050f270)<<< 250- * * Net::FTP=GLOB(0x800000010050f270)<<< 250- * DDJ files and material are available at * Net::FTP=GLOB(0x800000010050f270)<<< 250- * http://www.ddj.com/ * Net::FTP=GLOB(0x800000010050f270)<<< 250- * * Net::FTP=GLOB(0x800000010050f270)<<< 250- * please go there for access * Net::FTP=GLOB(0x800000010050f270)<<< 250- * * Net::FTP=GLOB(0x800000010050f270)<<< 250- * Questions may be addressed to editors@ddj.com * Net::FTP=GLOB(0x800000010050f270)<<< 250- * * Net::FTP=GLOB(0x800000010050f270)<<< 250- * Thanks! * Net::FTP=GLOB(0x800000010050f270)<<< 250- * * Net::FTP=GLOB(0x800000010050f270)<<< 250- ******************************************************************* Net::FTP=GLOB(0x800000010050f270)<<< 250- Net::FTP=GLOB(0x800000010050f270)<<< 250- Net::FTP=GLOB(0x800000010050f270)<<< 250 CWD command successful. Net::FTP=GLOB(0x800000010050f270)>>> TYPE I Net::FTP=GLOB(0x800000010050f270)<<< 200 Type set to I. Net::FTP=GLOB(0x800000010050f270)>>> PASV Net::FTP=GLOB(0x800000010050f270)<<< 227 Entering Passive Mode (199,125,85,76,218,133) Net::FTP=GLOB(0x800000010050f270)>>> RETR README Net::FTP=GLOB(0x800000010050f270)<<< 150 Opening BINARY mode data connection for 'README' (867 bytes). Net::FTP=GLOB(0x800000010050f270)<<< 226 Transfer complete. ok 3 ok Failed 1/4 test scripts, 75.00% okay. 1/7 subtests failed, 85.71% okay. Failed Test Stat Wstat Total Fail Failed List of Failed ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------- t/dir.t 1 1 100.00% 1 make: *** [test_dynamic] Error 25