diff options
| author | H.Merijn Brand <h.m.brand@xs4all.nl> | 2004-02-25 11:13:12 +0000 |
|---|---|---|
| committer | H.Merijn Brand <h.m.brand@xs4all.nl> | 2004-02-25 11:13:12 +0000 |
| commit | ff4091f15699664c73b1648f3e0ba5ff2c76be14 (patch) | |
| tree | 0065cde1bf6a375e5151c19c0fe7586090109d50 /lib/Net/Ping | |
| parent | 2463cec9eed76df1882d67924716c953eafc3a83 (diff) | |
| download | perl-ff4091f15699664c73b1648f3e0ba5ff2c76be14.tar.gz | |
Skip the Net/Ping/450_service failures on HP-UX for the time being
p4raw-id: //depot/perl@22375
Diffstat (limited to 'lib/Net/Ping')
| -rw-r--r-- | lib/Net/Ping/t/450_service.t | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/Net/Ping/t/450_service.t b/lib/Net/Ping/t/450_service.t index 006bf64efb..21e99f2c44 100644 --- a/lib/Net/Ping/t/450_service.t +++ b/lib/Net/Ping/t/450_service.t @@ -19,7 +19,8 @@ use Net::Ping; # for the TCP Server stuff instead of doing # all that direct socket() junk manually. -plan tests => 26, ($^O eq 'MSWin32' ? (todo => [18]) : ()); +plan tests => 26, ($^O eq 'MSWin32' ? (todo => [18]) : + $^O eq "hpux" ? (todo => [9, 18]) : ()); # Everything loaded fine ok 1; |