X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FTest-Leaner.git;a=blobdiff_plain;f=t%2Flib%2FTest%2FLeaner%2FTestImport.pm;fp=t%2Flib%2FTest%2FLeaner%2FTestImport.pm;h=30f786c71380d5a09decd8a16f635d606b88c495;hp=0c556818793da7db446f44a70a9e06b37b8e7b81;hb=d3e5f75f3c4d82429e8ef9dccf275e4e8e6d4260;hpb=5fd6c1574b8f8435c3555d9581ecd82d87ac4b76 diff --git a/t/lib/Test/Leaner/TestImport.pm b/t/lib/Test/Leaner/TestImport.pm index 0c55681..30f786c 100644 --- a/t/lib/Test/Leaner/TestImport.pm +++ b/t/lib/Test/Leaner/TestImport.pm @@ -78,7 +78,7 @@ sub test_import_arg { local $Test::Builder::Level = ($Test::Builder::Level || 0) + 1; my $use_fallback = $ENV{PERL_TEST_LEANER_USES_TEST_MORE}; - if ($use_fallback and $^V ge v5.8.4 and $^V le v5.8.5) { + if ($use_fallback and "$]" >= 5.008004 and "$]" <= 5.008005) { Test::More::plan(skip_all => 'goto may segfault randomly on perl 5.8.4 and 5.8.5'); } else {