Replace $] by "$]"

[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 c352456f15ef5fb1043622f48d332f3c5fd83446..ad3574b6ef26860ebf53954c64520cf1aa39a984 100644 (file)
--- a/t/20-localize-target.t
+++ b/t/20-localize-target.t
@@ -66,7 +66,8 @@ undef *x;
 
 SKIP:
 {
- skip 'Can\'t localize through a reference before 5.8.1' => 2 if $] < 5.008001;
+ skip 'Can\'t localize through a reference before 5.8.1' => 2
+                                                             if "$]" < 5.008001;
  eval q{
   no strict 'refs';
   local ${''} = 9;
@@ -80,7 +81,8 @@ SKIP:
 
 SKIP:
 {
- skip 'Can\'t localize through a reference before 5.8.1' => 2 if $] < 5.008001;
+ skip 'Can\'t localize through a reference before 5.8.1' => 2
+                                                             if "$]" < 5.008001;
  eval q{
   no strict 'refs';
   local ${''} = 10;