This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Move ZlibTestUtils.pm under t/
[perl5.git] / lib / AnyDBM_File.t
index 7bb1e49..b87d26a 100755 (executable)
@@ -2,19 +2,12 @@
 
 # $RCSfile: dbm.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:43 $
 
-use Test::More;
-
 BEGIN {
     chdir 't' if -d 't';
     @INC = '../lib';
     require Config; import Config;
-    if (($Config{'extensions'} !~ /\b(DB|[A-Z]DBM)_File\b/) ){
-      plan skip_all => "1..0 # Skipping (no DB_File or [A-Z]DBM_File)\n";
-    }
-    else {
-       plan tests => 12;
-    }
-
+    require Test::More; import Test::More;
+    plan(tests, 12);
 }
 
 require AnyDBM_File;