diff options
author | Mattias Päivärinta <mattias-p@users.noreply.github.com> | 2017-09-28 07:49:00 +0200 |
---|---|---|
committer | GitHub <noreply@github.com> | 2017-09-28 07:49:00 +0200 |
commit | aca255a5a9578415d91b05d52cf3325793960513 (patch) | |
tree | 018306ee46791b95589c90601177507bb15923f0 | |
parent | 00ad06fd3030ba4d24537cc189b9dc263068ed88 (diff) | |
parent | 9463312eb829e3d8e9970fef0c9230105c96e48e (diff) |
Merge pull request #17 from mattias-p/perl-version-requirements
Drop support for perl 5.10, 5.12, add 5.22, 5.24
-rw-r--r-- | .travis.yml | 4 | ||||
-rw-r--r-- | t/netldns.t | 5 |
2 files changed, 5 insertions, 4 deletions
diff --git a/.travis.yml b/.travis.yml index a3feeee..4e25a70 100644 --- a/.travis.yml +++ b/.travis.yml @@ -1,9 +1,9 @@ language: perl perl: + - "5.24" + - "5.22" - "5.20" - "5.18" - "5.16" - "5.14" - - "5.12" - - "5.10" before_install: cpanm --quiet --notest Devel::CheckLib diff --git a/t/netldns.t b/t/netldns.t index 7e77a6d..7cd5b8f 100644 --- a/t/netldns.t +++ b/t/netldns.t @@ -35,7 +35,7 @@ SKIP: { ok( !$p2->ad(), 'AD bit not set' ); ok( !$p2->do(), 'DO bit not set' ); - ok( $p2->querytime > 0 ); + cmp_ok( $p2->querytime, '>=', 0); is( $p2->answerfrom, '8.8.8.8', 'expected answerfrom' ); $p2->answerfrom( '1.2.3.4' ); is( $p2->answerfrom, '1.2.3.4', 'setting answerfrom works' ); @@ -80,7 +80,8 @@ SKIP: { is( scalar( $se->answer ), 0, 'zero answers' ); is( scalar( $se->authority ), 10, 'nine authority' ); my $add = scalar( $se->additional ); - ok( $add == 16 || $add == 15, 'sixteen additional' ); + cmp_ok( $add, '<=', 20, 'at most 20 additional' ); + cmp_ok( $add, '>=', 8, 'at least 8 additional' ); my $rr = Net::LDNS::RR->new_from_string( 'se. 172800 IN SOA catcher-in-the-rye.nic.se. registry-default.nic.se. 2013111305 1800 1800 864000 7200' ); |