| Subject: | make test fails on test 10 |
Hi, using perl 5.8.0 i'm trying to install Net::DNS-0.48
make test TEST_VERBOSE=1 says:
ok 5 - got a packet
ok 6 - answer has RRs
ok 7 - got a packet
ok 8 - anwer section had RRs
Server [192.168.1.6] did not give answers at /root/.cpan/build/Net-DNS-0.48/blib/lib/Net/DNS/Resolver/Recurse.pm line 73.
Server [192.168.1.6] did not give answers at /root/.cpan/build/Net-DNS-0.48/blib/lib/Net/DNS/Resolver/Recurse.pm line 73.
# Failed test (t/10-recurse.t at line 63)
# got: undef
# expected: '3'
# Looks like you planned 12 tests but only ran 9.
not ok 9
dubious
Test returned status 4 (wstat 1024, 0x400)
DIED. FAILED tests 9-12
Failed 4/12 tests, 66.67% okay
Failed Test Stat Wstat Total Fail Failed List of Failed
-------------------------------------------------------------------------------
t/10-recurse.t 4 1024 12 4 33.33% 9-12
1 test and 7 subtests skipped.
Failed 1/20 test scripts, 95.00% okay. 4/872 subtests failed, 99.54% okay.
make: *** [test_dynamic] Error 2
I ran the tests again, but edited the t/10-recurse.t file to add a new line at about line 53, just before $res->recursion_callback(sub { that says $res->debug(1). The new output is:
t/10-recurse...............1..12
ok 1 - use Net::DNS::Resolver::Recurse;
ok 2 - The object isa Net::DNS::Resolver::Recurse
ok 3 - hints() set
ok 4 - sanity check worked
ok 5 - got a packet
ok 6 - answer has RRs
ok 7 - got a packet
ok 8 - anwer section had RRs
;; hints()
;; hints(192.168.1.6)
;; verifying (root) zone...
;; query(., NS, IN)
;; send_udp(192.168.1.6:53)
Server [192.168.1.6] did not give answers at /root/.cpan/build/Net-DNS-0.48/blib /lib/Net/DNS/Resolver/Recurse.pm line 73.
;; answer from 192.168.1.6:53 : 228 bytes
;; HEADER SECTION
;; id = 38091
;; qr = 1 opcode = QUERY aa = 0 tc = 0 rd = 1
;; ra = 1 ad = 0 cd = 0 rcode = NOERROR
;; qdcount = 1 ancount = 13 nscount = 0 arcount = 0
;; QUESTION SECTION (1 record)
;; . IN NS
;; ANSWER SECTION (13 records)
. 514507 IN NS I.ROOT-SERVERS.NET.
. 514507 IN NS E.ROOT-SERVERS.NET.
. 514507 IN NS D.ROOT-SERVERS.NET.
. 514507 IN NS A.ROOT-SERVERS.NET.
. 514507 IN NS H.ROOT-SERVERS.NET.
. 514507 IN NS C.ROOT-SERVERS.NET.
. 514507 IN NS G.ROOT-SERVERS.NET.
. 514507 IN NS F.ROOT-SERVERS.NET.
. 514507 IN NS B.ROOT-SERVERS.NET.
. 514507 IN NS J.ROOT-SERVERS.NET.
. 514507 IN NS K.ROOT-SERVERS.NET.
. 514507 IN NS L.ROOT-SERVERS.NET.
. 514507 IN NS M.ROOT-SERVERS.NET.
;; AUTHORITY SECTION (0 records)
;; ADDITIONAL SECTION (0 records)
;; FOUND HINT: i.root-servers.net
;; FOUND HINT: e.root-servers.net
;; FOUND HINT: d.root-servers.net
;; FOUND HINT: a.root-servers.net
;; FOUND HINT: h.root-servers.net
;; FOUND HINT: c.root-servers.net
;; FOUND HINT: g.root-servers.net
;; FOUND HINT: f.root-servers.net
;; FOUND HINT: b.root-servers.net
;; FOUND HINT: j.root-servers.net
;; FOUND HINT: k.root-servers.net
;; FOUND HINT: l.root-servers.net
;; FOUND HINT: m.root-servers.net
;; verifying (root) zone...
;; query(., NS, IN)
;; send_udp(192.168.1.6:53)
;; send_udp(192.168.1.6:53)
;; send_udp(192.168.1.6:53)
;; send_udp(192.168.1.6:53)
Server [192.168.1.6] did not give answers at /root/.cpan/build/Net-DNS-0.48/blib/lib/Net/DNS/Resolver/Recurse.pm line 73.
;; _dorecursion() depth=[0] known_zone=[.]
;; _dorecursion() Failed to extract nameserver IPs:
$VAR1 = [
{},
{}
];
;; _dorecursion() No authority information could be obtained.
not ok 9
# Failed test (t/10-recurse.t at line 65)
# got: undef
# expected: '3'
# Looks like you planned 12 tests but only ran 9.
dubious
Test returned status 4 (wstat 1024, 0x400)
DIED. FAILED tests 9-12
Failed 4/12 tests, 66.67% okay
Failed Test Stat Wstat Total Fail Failed List of Failed
-------------------------------------------------------------------------------
t/10-recurse.t 4 1024 12 4 33.33% 9-12
1 test and 7 subtests skipped.
Failed 1/20 test scripts, 95.00% okay. 4/872 subtests failed, 99.54% okay.
make: *** [test_dynamic] Error 2