difforig libwww-perl-6.38-5 diff -u libwww-perl-6.38-5/t/base/protocols/nntp.t.orig --- libwww-perl-6.38-5/t/base/protocols/nntp.t.orig 2019-05-05 07:41:39.000000000 +0200 +++ libwww-perl-6.38-5/t/base/protocols/nntp.t 2019-05-05 07:43:22.000000000 +0200 @@ -9,4 +9,4 @@ my $ua = LWP::UserAgent->new; my $res = $ua->get('nntp://nntp.perl.org/blahblahblah@blahblahblah'); -is($res->code, 404, '404 on fake nntp url'); +like($res->code, qr/^(404|500)$/, $res->code." on fake nntp url");