From 7d7d93ad5efb66d5764017a7a62c90f3b5353986 Mon Sep 17 00:00:00 2001
From: =?utf8?q?S=C3=A9bastien=20Aperghis-Tramoni?= <saper@cpan.org>
Date: Wed, 5 Dec 2012 17:04:25 -0700
Subject: [PATCH] dist/constant/t/utf8.t: Skip tests for early Perls

---
 dist/constant/t/utf8.t | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/dist/constant/t/utf8.t b/dist/constant/t/utf8.t
index c8830c3..b754202 100644
--- a/dist/constant/t/utf8.t
+++ b/dist/constant/t/utf8.t
@@ -1,9 +1,15 @@
 #!./perl -T
 
+use Test::More;
+BEGIN {
+ plan skip_all => "irrelevant on pre-5.8.4" if $] < 5.008004
+}
+
 # Tests for constant.pm that require the utf8 pragma
 
 use utf8;
-use Test::More tests => 2;
+
+plan tests => 2;
 
 use constant π		=> 4 * atan2 1, 1;
 
-- 
2.7.4