Replace $] by "$]"

[perl/modules/Lexical-Types.git] / t / 13-padsv.t

diff --git a/t/13-padsv.t b/t/13-padsv.t
index ae3cbff3ecd485290b54d3504347376803dac7a5..ab042aee6968be0964360d462b7c5687b6f58d70 100644 (file)
--- a/t/13-padsv.t
+++ b/t/13-padsv.t
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-use Config qw/%Config/;
+use Config qw<%Config>;
 
 use Test::More tests => 4;
 
@@ -34,7 +34,7 @@ sub Int::TYPEDSCALAR { push @lines, (caller(0))[2]; () }
 
 SKIP: {
  skip 'Broken with threaded perls before 5.8.4' => 1
-                                      if $Config{useithreads} and $] < 5.008004;
+                                    if $Config{useithreads} and "$]" < 5.008004;
 
  use Lexical::Types as => sub {
   # In 5.10, this closure is compiled before hints are enabled, so no hintseval