diff options
| -rwxr-xr-x | Porting/Maintainers.pl | 2 | ||||
| -rw-r--r-- | cpan/experimental/lib/experimental.pm | 22 |
2 files changed, 13 insertions, 11 deletions
diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl index 34e14b41f5..32100a0db0 100755 --- a/Porting/Maintainers.pl +++ b/Porting/Maintainers.pl @@ -401,7 +401,7 @@ use File::Glob qw(:case); }, 'experimental' => { - 'DISTRIBUTION' => 'LEONT/experimental-0.007.tar.gz', + 'DISTRIBUTION' => 'LEONT/experimental-0.008.tar.gz', 'FILES' => q[cpan/experimental], 'EXCLUDED' => [ qr{^t/release-.*\.t}, diff --git a/cpan/experimental/lib/experimental.pm b/cpan/experimental/lib/experimental.pm index 1c43e1064a..96f8a419ec 100644 --- a/cpan/experimental/lib/experimental.pm +++ b/cpan/experimental/lib/experimental.pm @@ -1,7 +1,8 @@ package experimental; -$experimental::VERSION = '0.007'; +$experimental::VERSION = '0.008'; use strict; use warnings; +use version (); use feature (); use Carp qw/croak carp/; @@ -10,12 +11,12 @@ my %warnings = map { $_ => 1 } grep { /^experimental::/ } keys %warnings::Offset my %features = map { $_ => 1 } keys %feature::feature; my %min_version = ( - array_base => 5, - autoderef => 5.014000, - lexical_topic => 5.010000, - regex_sets => 5.018000, - smartmatch => 5.010001, - signatures => 5.019009, # change to 5.20.0 someday? -- rjbs, 2014-02-08 + array_base => version->new('5'), + autoderef => version->new('5.14.0'), + lexical_topic => version->new('5.10.0'), + regex_sets => version->new('5.18.0'), + smartmatch => version->new('5.10.1'), + signatures => version->new('5.20.0'), ); my %additional = ( @@ -38,7 +39,7 @@ sub _enable { croak "Can't enable unknown feature $pragma"; } elsif ($min_version{$pragma} > $]) { - croak "Need perl version $min_version{$pragma} or later for feature $pragma"; + croak "Need perl $min_version{$pragma} or later for feature $pragma"; } } @@ -92,7 +93,7 @@ experimental - Experimental features made easy =head1 VERSION -version 0.007 +version 0.008 =head1 SYNOPSIS @@ -130,7 +131,8 @@ The supported features, documented further below, are: in interpolating strings regex_sets - allow extended bracketed character classes in regexps signatures - allow subroutine signatures (for named arguments) - smartmatch - allow the use of ~~, given, and when + smartmatch - allow the use of ~~ + switch - allow the use of ~~, given, and when =head2 Disclaimer |