Skip two pairs of tests in t/20-localize-target.t with perl 5.8.0

[perl/modules/Scope-Upper.git] / t / 20-localize-target.t

diff --git a/t/20-localize-target.t b/t/20-localize-target.t
index 136feb6eed60e920ecaaac262e089fb4a3f5015d..9bd7a3885fcc6376122bd87515a4ef96dda79f6c 100644 (file)
--- a/t/20-localize-target.t
+++ b/t/20-localize-target.t
@@ -66,7 +66,7 @@ undef *x;
 
 SKIP:
 {
- skip 'Can\'t localize through a reference in 5.6' => 2 if $] < 5.008;
+ skip 'Can\'t localize through a reference before 5.8.1' => 2 if $] < 5.008001;
  eval q{
   no strict 'refs';
   local ${''} = 9;
@@ -80,7 +80,7 @@ SKIP:
 
 SKIP:
 {
- skip 'Can\'t localize through a reference in 5.6' => 2 if $] < 5.008;
+ skip 'Can\'t localize through a reference before 5.8.1' => 2 if $] < 5.008001;
  eval q{
   no strict 'refs';
   local ${''} = 10;