From 7fba29668402ec06ad00dfafda69913bcbb2c1df Mon Sep 17 00:00:00 2001 From: Father Chrysostomos Date: Wed, 19 Aug 2015 13:10:16 -0700 Subject: Disable lexical $_ This just disables the syntax and modifes the tests. The underlying infrastructure has not been removed yet. I had to change a couple of tests in cpan/. --- cpan/experimental/t/basic.t | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) (limited to 'cpan/experimental') diff --git a/cpan/experimental/t/basic.t b/cpan/experimental/t/basic.t index ee03a02608..be27df6ace 100644 --- a/cpan/experimental/t/basic.t +++ b/cpan/experimental/t/basic.t @@ -5,12 +5,14 @@ use Test::More 0.89; local $SIG{__WARN__} = sub { fail("Got unexpected warning"); diag($_[0]) }; if ($] >= 5.010000) { - is (eval <<'END', 1, 'lexical topic compiles') or diag $@; - use experimental 'lexical_topic'; - my $_ = 1; - is($_, 1, '$_ is 1'); - 1; + if ($] < 5.023) { + is (eval <<'END', 1, 'lexical topic compiles') or diag $@; + use experimental 'lexical_topic'; + my $_ = 1; + is($_, 1, '$_ is 1'); + 1; END + } } else { fail("No experimental features available on perl $]"); -- cgit v1.2.1