Skip criteria test on perls below 5.8.0.

pjcj · Sep 20, 2010 · efead27 · efead27
1 parent 3d64c34
commit efead27
Showing 1 changed file with 10 additions and 1 deletion.
diff --git a/t/internal/criteria.t b/t/internal/criteria.t
@@ -1,11 +1,20 @@
 use strict;
 use warnings;
 
-use Test::More tests => 5;
+use Test::More;
 use Test::Warn;
 
 use Devel::Cover "-silent", 1;
 
+if ($] < 5.008000)
+{
+    plan skip_all => "Test requires perl 5.8.0 or greater";
+}
+else
+{
+    plan tests => 5;
+}
+
 Devel::Cover::set_coverage("none");
 is Devel::Cover::get_coverage(), "", "Set coverage to none empties coverage";