X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FLexical-Types.git;a=blobdiff_plain;f=t%2F14-ro.t;h=1c4a7e07814e8d42b6972b98e24622918efa47be;hp=bae8ccf079920b9774c1c57edbf491ac3c002061;hb=20bcb585bd9651cd40e91ab49b3651aa7259c3a6;hpb=a0eeae209119b07c3961d3432055eccf84b3b37c

diff --git a/t/14-ro.t b/t/14-ro.t
index bae8ccf..1c4a7e0 100644
--- a/t/14-ro.t
+++ b/t/14-ro.t
@@ -24,7 +24,7 @@ sub ro_re {
 }
 
 sub maybe_warn {
- diag 'This will throw two warnings' if "$]" >= 5.008008 and "$]" < 5.009;
+ diag 'This will throw two warnings' if "$]" >= 5.008_008 and "$]" < 5.009;
 }
 
 {
@@ -38,7 +38,7 @@ sub maybe_warn {
 }
 
 SKIP: {
- skip 'Kinda broken on old 5.8.x' => 1 if "$]" <= 5.008006;
+ skip 'Kinda broken on old 5.8.x' => 1 if "$]" <= 5.008_006;
  maybe_warn();
  local $@;
  eval q!