diff options
| author | Robin Barker <RMBarker@cpan.org> | 2007-12-04 14:05:47 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-12-04 14:44:23 +0000 |
| commit | 1ced8e525c24905a8360d3d05082f92d662da505 (patch) | |
| tree | fe5642f084bb080ef2e6553c374a7a531681d30f /lib/Net | |
| parent | c4bd451b3de038d730cdb89394e52b2360cf6c47 (diff) | |
| download | perl-1ced8e525c24905a8360d3d05082f92d662da505.tar.gz | |
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
Diffstat (limited to 'lib/Net')
| -rw-r--r-- | lib/Net/Ping/t/190_alarm.t | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/lib/Net/Ping/t/190_alarm.t b/lib/Net/Ping/t/190_alarm.t index a032014d96..4d31f1165a 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; |