diff options
Diffstat (limited to 'lib/Net/Ping/t/110_icmp_inst.t')
-rw-r--r-- | lib/Net/Ping/t/110_icmp_inst.t | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/Net/Ping/t/110_icmp_inst.t b/lib/Net/Ping/t/110_icmp_inst.t index 41f8e155e5..b0ee1b74f3 100644 --- a/lib/Net/Ping/t/110_icmp_inst.t +++ b/lib/Net/Ping/t/110_icmp_inst.t @@ -21,6 +21,8 @@ if (($> and $^O ne 'VMS') or ($^O eq 'VMS' and (`write sys\$output f\$privilege("SYSPRV")` =~ m/FALSE/))) { skip "icmp ping requires root privileges.", 1; +} elsif ($^O eq 'MacOS') { + skip "icmp protocol not supported.", 1; } else { my $p = new Net::Ping "icmp"; ok !!$p; |