From edd0583e505bf8be15700db63562c98bdf8be40c Mon Sep 17 00:00:00 2001
From: Chris 'BinGOs' Williams <chris@bingosnet.co.uk>
Date: Sun, 6 Jul 2014 11:52:41 +0100
Subject: [PATCH] Update experimental to CPAN version 0.008

  [DELTA]

0.008     2014-07-05 13:58:28+02:00 Europe/Amsterdam
          Give better perl version formatting
          Fix smartmatch/switch description
---
 Porting/Maintainers.pl                |  2 +-
 cpan/experimental/lib/experimental.pm | 22 ++++++++++++----------
 2 files changed, 13 insertions(+), 11 deletions(-)

diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl
index 34e14b4..32100a0 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 1c43e10..96f8a41 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
 
-- 
1.8.3.1