SYN SYN
[p5sagit/p5-mst-13.2.git] / t / lib / anydbm.t
index a7fca17..40c4366 100755 (executable)
@@ -4,7 +4,12 @@
 
 BEGIN {
     chdir 't' if -d 't';
-    unshift @INC, '../lib';
+    @INC = '../lib';
+    require Config; import Config;
+    if (($Config{'extensions'} !~ /\b(DB|[A-Z]DBM)_File\b/) ){
+      print "1..0 # Skipping (no DB_File or [A-Z]DBM_File)\n";
+      exit 0;
+    }
 }
 require AnyDBM_File;
 use Fcntl;