In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/d18ec13df17c5e14d3ecc903ff761bc2254269bb?hp=b5048e7b9abae986778038f1e36281c6175b17e1>

- Log -----------------------------------------------------------------
commit d18ec13df17c5e14d3ecc903ff761bc2254269bb
Author: H.Merijn Brand <[email protected]>
Date:   Sat Nov 12 12:42:40 2016 +0100

    skip Net::Ping UDP on HP-UX
-----------------------------------------------------------------------

Summary of changes:
 dist/Net-Ping/t/510_ping_udp.t | 1 +
 1 file changed, 1 insertion(+)

diff --git a/dist/Net-Ping/t/510_ping_udp.t b/dist/Net-Ping/t/510_ping_udp.t
index aa48e900..a154fec 100644
--- a/dist/Net-Ping/t/510_ping_udp.t
+++ b/dist/Net-Ping/t/510_ping_udp.t
@@ -21,6 +21,7 @@ SKIP: {
     skip "No udp echo port", 1 unless getservbyname('echo', 'udp');
     skip "udp ping blocked by Window's default settings", 1 if 
isWindowsVista();
     skip "No getprotobyname", 1 unless $Config{d_getpbyname};
+    skip "Not allowed on HP-UX", 1 if $^O eq "hpux";
     my $p = new Net::Ping "udp";
     is($p->ping("127.0.0.1"), 1);
 }

--
Perl5 Master Repository

Reply via email to