From 1ced8e525c24905a8360d3d05082f92d662da505 Mon Sep 17 00:00:00 2001
From: Robin Barker <RMBarker@cpan.org>
Date: Tue, 4 Dec 2007 14:05:47 +0000
Subject: [PATCH] PATCH lib/Net/Ping/t/190_alarm.t From: "Robin Barker"
 <Robin.Barker@npl.co.uk> Message-ID:
 <46A0F33545E63740BC7563DE59CA9C6D09396A@exchsvr2.npl.ad.local>

p4raw-id: //depot/perl@32571
---
 lib/Net/Ping/t/190_alarm.t | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/lib/Net/Ping/t/190_alarm.t b/lib/Net/Ping/t/190_alarm.t
index a032014..4d31f11 100644
--- a/lib/Net/Ping/t/190_alarm.t
+++ b/lib/Net/Ping/t/190_alarm.t
@@ -4,6 +4,12 @@
 # Based on code written by radu@netsoft.ro (Radu Greab).
 
 BEGIN {
+  if ($ENV{PERL_CORE}) {
+    unless ($ENV{PERL_TEST_Net_Ping}) {
+      print "1..0 \# Skip: network dependent test\n";
+        exit;
+    }
+  }
   unless (eval "require Socket") {
     print "1..0 \# Skip: no Socket\n";
     exit;
-- 
2.7.4