Skip test if Data::Dumper not built

p4raw-id: //depot/perl@22966

diff --git a/lib/Tie/RefHash.t b/lib/Tie/RefHash.t
index 55fde14..a855446 100644 (file)
--- a/lib/Tie/RefHash.t
+++ b/lib/Tie/RefHash.t
@@ -13,6 +13,11 @@ BEGIN {
     chdir 't' if -d 't';
     @INC = '.'; 
     push @INC, '../lib';
+    require Config;
+    if (($Config::Config{'extensions'} !~ /\bData::Dumper\b/) ){
+       print "1..0 # Skip -- Perl configured without Data::Dumper module\n";
+       exit 0;
+    }
 }    
 
 use strict;