Make Perl version numbers more readable

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

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