From 5674620e7e66dca603ef708c92256ac6086f3fcd Mon Sep 17 00:00:00 2001 From: Slaven Rezic Date: Sat, 23 Dec 2023 20:49:50 +0100 Subject: [PATCH] fix skip count + avoid problems with wildcard DNS names (GH#53) --- t/valid.t | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/t/valid.t b/t/valid.t index 966e164..1986bd1 100644 --- a/t/valid.t +++ b/t/valid.t @@ -128,11 +128,11 @@ ok( ); SKIP: { - skip "your dns appears missing or failing to resolve", 3 + skip "your dns appears missing or failing to resolve", 4 unless eval { $v->address(-address=> 'devnull@pobox.com', -mxcheck => 1) }; if ( - $v->address(-address => 'blort@will-never-exist.pobox.com', -mxcheck => 1) + $v->address(-address => 'blort@will-never-exist.pobox.com.', -mxcheck => 1) ) { skip "your dns is lying to you; you must not use mxcheck", 3; } @@ -143,7 +143,7 @@ SKIP: { ); ok( - !$v->address(-address => 'blort@will-never-exist.pobox.com', -mxcheck => 1), + !$v->address(-address => 'blort@will-never-exist.pobox.com.', -mxcheck => 1), 'blort@will-never-exist.pobox.com, with mxcheck, is invalid', ) or diag "was using $Email::Valid::DNS_Method for dns resolution"; -- 2.11.0