Added core-only version check to Module-CoreList

This should ensure that the versions of Module-CoreList modules
always match the version of perl.

Have to special-case skip for v5.21.1, because rjbs

(cherry picked from commit 4915b61c095597462aef8cf7437320c10954bb6d)

2 files changed, 22 insertions, 0 deletions

diff --git a/MANIFEST b/MANIFEST
index 5d8b6b4ade..f4f740487d 100644
--- a/MANIFEST
+++ b/MANIFEST
@@ -3305,6 +3305,7 @@ dist/Module-CoreList/Makefile.PL		Module::CoreList
 dist/Module-CoreList/MANIFEST			Module::CoreList
 dist/Module-CoreList/README			Module::CoreList
 dist/Module-CoreList/t/corelist.t		Module::CoreList tests
+dist/Module-CoreList/t/corevers.t		Module::CoreList tests
 dist/Module-CoreList/t/deprecated.t		Module::CoreList tests
 dist/Module-CoreList/t/find_modules.t		Module::CoreList tests
 dist/Module-CoreList/t/is_core.t		Module::CoreList tests
diff --git a/dist/Module-CoreList/t/corevers.t b/dist/Module-CoreList/t/corevers.t
new file mode 100644
index 0000000000..09d5d72da0
--- /dev/null
+++ b/dist/Module-CoreList/t/corevers.t
@@ -0,0 +1,21 @@
+#!perl -w
+use strict;
+use Test::More;
+
+plan skip_all => 'This is perl core-only test' unless $ENV{PERL_CORE};
+plan skip_all => 'Special case v5.21.1 because rjbs' if sprintf("v%vd", $^V) eq 'v5.21.1';
+
+my @modules = qw[
+  Module::CoreList
+  Module::CoreList::Utils
+  Module::CoreList::TieHashDelta
+];
+
+plan tests => scalar @modules;
+
+foreach my $mod ( @modules ) {
+  eval "require $mod";
+  my $vers = eval $mod->VERSION;
+  ok( !( $vers < $] || $vers > $] ), "$mod version should match perl version in core" )
+    or diag("$mod $vers doesn't match $]");
+}