Replace $] by "$]"

[perl/modules/autovivification.git] / t / 40-scope.t

diff --git a/t/40-scope.t b/t/40-scope.t
index c79caaf66d5535b73716403519ca31aacac41f1e..2e2afb8a1d6b357d59f62753b0fc22f24500ce64 100644 (file)
--- a/t/40-scope.t
+++ b/t/40-scope.t
@@ -38,7 +38,7 @@ our $blurp;
  is        $@,     '',      'second require test doesn\'t croak prematurely';
  my $expect;
  $expect = { r1_main => { }, r1_eval => { } };
- $expect->{r2_eval} = { } if $] <  5.009005;
+ $expect->{r2_eval} = { } if "$]" <  5.009005;
  is_deeply $blurp, $expect, 'second require test didn\'t vivify';
 }