X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2Flib%2FTest%2FLeaner%2FTestImport.pm;h=495aa6714faf4b9d57c2be9faea140a9e29e233e;hb=de0427488ee9f7973135b9568461a9572fed1c89;hp=0c556818793da7db446f44a70a9e06b37b8e7b81;hpb=929c8bab7d9cc5a7247006772efa931797016d59;p=perl%2Fmodules%2FTest-Leaner.git diff --git a/t/lib/Test/Leaner/TestImport.pm b/t/lib/Test/Leaner/TestImport.pm index 0c55681..495aa67 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.008_004 and "$]" <= 5.008_005) { Test::More::plan(skip_all => 'goto may segfault randomly on perl 5.8.4 and 5.8.5'); } else {