Replace $] by "$]"

[perl/modules/Test-Leaner.git] / t / 03-fallback.t

diff --git a/t/03-fallback.t b/t/03-fallback.t
index 9c2451eae9221a298d69b2c7f5c965141068d228..c57c45eebb11eb9b96a24710a4fb8e2cd000a36d 100644 (file)
--- a/t/03-fallback.t
+++ b/t/03-fallback.t
@@ -4,7 +4,7 @@ use strict;
 use warnings;
 
 BEGIN {
- if ($^V ge v5.8.4 and $^V le v5.8.5) {
+ if ("$]" >= 5.008004 and "$]" <= 5.008005) {
   require Test::More;
   Test::More::plan(skip_all
                        => 'goto may segfault randomly on perl 5.8.4 and 5.8.5');