diff options
Diffstat (limited to 'cpan/experimental')
| -rw-r--r-- | cpan/experimental/t/basic.t | 12 |
1 files changed, 7 insertions, 5 deletions
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 $]"); |