[libmodule-corelist-perl] 01/01: Imported Upstream version 2.96
Salvatore Bonaccorso
carnil at debian.org
Mon Aug 12 17:40:12 UTC 2013
This is an automated email from the git hooks/post-receive script.
carnil pushed a commit to annotated tag upstream/2.96
in repository libmodule-corelist-perl.
commit 9bb813270dad1b0aa12620dc57302e084294463f
Author: Salvatore Bonaccorso <carnil at debian.org>
Date: Mon Aug 12 19:36:52 2013 +0200
Imported Upstream version 2.96
---
Changes | 7 +
MANIFEST | 1 +
META.json | 4 +-
META.yml | 4 +-
lib/Module/CoreList.pm | 151 +++++-
lib/Module/CoreList.pod | 2 +-
lib/Module/CoreList/TieHashDelta.pm | 2 +-
lib/Module/CoreList/Utils.pm | 986 +++++++++++++++++++++++++++++++++++
8 files changed, 1145 insertions(+), 12 deletions(-)
diff --git a/Changes b/Changes
index fbcbd4d..7ce3350 100644
--- a/Changes
+++ b/Changes
@@ -1,3 +1,10 @@
+2.96 Mon Aug 12 2013
+ - Utils module listing all utilities released with core
+ - Updated for v5.18.1
+
+2.95 Mon Jun 22 2013
+ - Updated for v5.19.3
+
2.94 Sun Jun 21 2013
- Updated for v5.19.2
diff --git a/MANIFEST b/MANIFEST
index 1f963b9..7d524a2 100644
--- a/MANIFEST
+++ b/MANIFEST
@@ -4,6 +4,7 @@ identify-dependencies
lib/Module/CoreList.pm
lib/Module/CoreList.pod
lib/Module/CoreList/TieHashDelta.pm
+lib/Module/CoreList/Utils.pm
README
MANIFEST
Makefile.PL
diff --git a/META.json b/META.json
index c5ba97a..d259756 100644
--- a/META.json
+++ b/META.json
@@ -4,7 +4,7 @@
"unknown"
],
"dynamic_config" : 1,
- "generated_by" : "ExtUtils::MakeMaker version 6.6908, CPAN::Meta::Converter version 2.131560",
+ "generated_by" : "ExtUtils::MakeMaker version 6.7309, CPAN::Meta::Converter version 2.132140",
"license" : [
"perl_5"
],
@@ -47,5 +47,5 @@
"url" : "git://perl5.git.perl.org/perl.git"
}
},
- "version" : "2.94"
+ "version" : "2.96"
}
diff --git a/META.yml b/META.yml
index 8ac2863..75a0812 100644
--- a/META.yml
+++ b/META.yml
@@ -7,7 +7,7 @@ build_requires:
configure_requires:
ExtUtils::MakeMaker: 0
dynamic_config: 1
-generated_by: 'ExtUtils::MakeMaker version 6.6908, CPAN::Meta::Converter version 2.131560'
+generated_by: 'ExtUtils::MakeMaker version 6.7309, CPAN::Meta::Converter version 2.132140'
license: perl
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -24,4 +24,4 @@ resources:
bugtracker: https://rt.perl.org/rt3/
homepage: http://dev.perl.org/
repository: git://perl5.git.perl.org/perl.git
-version: 2.94
+version: 2.96
diff --git a/lib/Module/CoreList.pm b/lib/Module/CoreList.pm
index 008ef8a..8919d8c 100644
--- a/lib/Module/CoreList.pm
+++ b/lib/Module/CoreList.pm
@@ -3,7 +3,7 @@ use strict;
use vars qw/$VERSION %released %version %families %upstream
%bug_tracker %deprecated/;
use Module::CoreList::TieHashDelta;
-$VERSION = '2.94';
+$VERSION = '2.96';
my $dumpinc = 0;
sub import {
@@ -234,6 +234,7 @@ sub changes_between {
5.019000 => '2013-05-20',
5.019001 => '2013-06-21',
5.019002 => '2013-07-22',
+ 5.018001 => '2013-08-12',
);
for my $version ( sort { $a <=> $b } keys %released ) {
@@ -7698,6 +7699,7 @@ my %delta = (
'CPANPLUS::Shell::Default::Plugins::CustomSource'=> '0.9135',
'CPANPLUS::Shell::Default::Plugins::Remote'=> '0.9135',
'CPANPLUS::Shell::Default::Plugins::Source'=> '0.9135',
+ 'Config' => '5.017009',
'Config::Perl::V' => '0.17',
'DBM_Filter' => '0.05',
'Data::Dumper' => '2.142',
@@ -7815,6 +7817,7 @@ my %delta = (
delta_from => 5.017009,
changed => {
'Benchmark' => '1.15',
+ 'Config' => '5.017009',
'Data::Dumper' => '2.145',
'Digest::SHA' => '5.84',
'Encode' => '2.49',
@@ -7937,6 +7940,7 @@ my %delta = (
changed => {
'App::Cpan' => '1.61',
'B::Deparse' => '1.20',
+ 'Config' => '5.017009',
'Exporter' => '5.68',
'Exporter::Heavy' => '5.68',
'ExtUtils::CBuilder' => '0.280210',
@@ -7984,6 +7988,7 @@ my %delta = (
changed => {
'Carp' => '1.29',
'Carp::Heavy' => '1.29',
+ 'Config' => '5.018000',
'Hash::Util' => '0.16',
'IO::Handle' => '1.34',
'IO::Socket' => '1.36',
@@ -8023,6 +8028,7 @@ my %delta = (
5.019000 => {
delta_from => 5.018000,
changed => {
+ 'Config' => '5.019000',
'Getopt::Std' => '1.08',
'Module::CoreList' => '2.91',
'Module::CoreList::TieHashDelta'=> '2.91',
@@ -8119,6 +8125,7 @@ my %delta = (
'Compress::Raw::Bzip2' => '2.061',
'Compress::Raw::Zlib' => '2.061',
'Compress::Zlib' => '2.061',
+ 'Config' => '5.019001',
'Config::Perl::V' => '0.18',
'Cwd' => '3.41',
'DB' => '1.06',
@@ -8372,6 +8379,7 @@ my %delta = (
'B::Deparse' => '1.22',
'Benchmark' => '1.17',
'Class::Struct' => '0.65',
+ 'Config' => '5.019002',
'DB' => '1.07',
'DBM_Filter' => '0.06',
'DBM_Filter::compress' => '0.03',
@@ -8447,6 +8455,20 @@ my %delta = (
removed => {
}
},
+ 5.018001 => {
+ delta_from => 5.018000,
+ changed => {
+ 'B' => '1.42_01',
+ 'Config' => '5.018001',
+ 'Digest::SHA' => '5.84_01',
+ 'Module::CoreList' => '2.96',
+ 'Module::CoreList::TieHashDelta'=> '2.96',
+ 'Module::CoreList::Utils'=> '2.96',
+ },
+ removed => {
+ 'VMS::Filespec' => 1,
+ }
+ },
);
for my $version (sort { $a <=> $b } keys %delta) {
@@ -8681,6 +8703,13 @@ for my $version (sort { $a <=> $b } keys %delta) {
removed => {
}
},
+ 5.018001 => {
+ delta_from => 5.018,
+ changed => {
+ },
+ removed => {
+ }
+ },
);
for my $version (sort { $a <=> $b } keys %deprecated) {
@@ -8697,6 +8726,7 @@ for my $version (sort { $a <=> $b } keys %deprecated) {
'App::Prove::State' => 'cpan',
'App::Prove::State::Result'=> 'cpan',
'App::Prove::State::Result::Test'=> 'cpan',
+ 'Archive::Extract' => 'cpan',
'Archive::Tar' => 'cpan',
'Archive::Tar::Constant'=> 'cpan',
'Archive::Tar::File' => 'cpan',
@@ -8706,6 +8736,8 @@ for my $version (sort { $a <=> $b } keys %deprecated) {
'B::Concise' => 'blead',
'B::Debug' => 'cpan',
'B::Deparse' => 'blead',
+ 'B::Lint' => 'cpan',
+ 'B::Lint::Debug' => 'cpan',
'CGI' => 'cpan',
'CGI::Apache' => 'cpan',
'CGI::Carp' => 'cpan',
@@ -8757,6 +8789,47 @@ for my $version (sort { $a <=> $b } keys %deprecated) {
'CPAN::Tarzip' => 'cpan',
'CPAN::URL' => 'cpan',
'CPAN::Version' => 'cpan',
+ 'CPANPLUS' => 'cpan',
+ 'CPANPLUS::Backend' => 'cpan',
+ 'CPANPLUS::Backend::RV' => 'cpan',
+ 'CPANPLUS::Config' => 'cpan',
+ 'CPANPLUS::Config::HomeEnv'=> 'cpan',
+ 'CPANPLUS::Configure' => 'cpan',
+ 'CPANPLUS::Configure::Setup'=> 'cpan',
+ 'CPANPLUS::Dist' => 'cpan',
+ 'CPANPLUS::Dist::Autobundle'=> 'cpan',
+ 'CPANPLUS::Dist::Base' => 'cpan',
+ 'CPANPLUS::Dist::Build' => 'cpan',
+ 'CPANPLUS::Dist::Build::Constants'=> 'cpan',
+ 'CPANPLUS::Dist::MM' => 'cpan',
+ 'CPANPLUS::Dist::Sample'=> 'cpan',
+ 'CPANPLUS::Error' => 'cpan',
+ 'CPANPLUS::Internals' => 'cpan',
+ 'CPANPLUS::Internals::Constants'=> 'cpan',
+ 'CPANPLUS::Internals::Constants::Report'=> 'cpan',
+ 'CPANPLUS::Internals::Extract'=> 'cpan',
+ 'CPANPLUS::Internals::Fetch'=> 'cpan',
+ 'CPANPLUS::Internals::Report'=> 'cpan',
+ 'CPANPLUS::Internals::Search'=> 'cpan',
+ 'CPANPLUS::Internals::Source'=> 'cpan',
+ 'CPANPLUS::Internals::Source::Memory'=> 'cpan',
+ 'CPANPLUS::Internals::Source::SQLite'=> 'cpan',
+ 'CPANPLUS::Internals::Source::SQLite::Tie'=> 'cpan',
+ 'CPANPLUS::Internals::Utils'=> 'cpan',
+ 'CPANPLUS::Internals::Utils::Autoflush'=> 'cpan',
+ 'CPANPLUS::Module' => 'cpan',
+ 'CPANPLUS::Module::Author'=> 'cpan',
+ 'CPANPLUS::Module::Author::Fake'=> 'cpan',
+ 'CPANPLUS::Module::Checksums'=> 'cpan',
+ 'CPANPLUS::Module::Fake'=> 'cpan',
+ 'CPANPLUS::Module::Signature'=> 'cpan',
+ 'CPANPLUS::Selfupdate' => 'cpan',
+ 'CPANPLUS::Shell' => 'cpan',
+ 'CPANPLUS::Shell::Classic'=> 'cpan',
+ 'CPANPLUS::Shell::Default'=> 'cpan',
+ 'CPANPLUS::Shell::Default::Plugins::CustomSource'=> 'cpan',
+ 'CPANPLUS::Shell::Default::Plugins::Remote'=> 'cpan',
+ 'CPANPLUS::Shell::Default::Plugins::Source'=> 'cpan',
'Carp' => 'blead',
'Carp::Heavy' => 'blead',
'Compress::Raw::Bzip2' => 'cpan',
@@ -8765,7 +8838,8 @@ for my $version (sort { $a <=> $b } keys %deprecated) {
'Config::Perl::V' => 'cpan',
'Cwd' => 'blead',
'DB_File' => 'cpan',
- 'Devel::PPPort' => 'undef',
+ 'Devel::InnerPackage' => 'cpan',
+ 'Devel::PPPort' => 'cpan',
'Digest' => 'cpan',
'Digest::MD5' => 'cpan',
'Digest::SHA' => 'cpan',
@@ -8846,7 +8920,6 @@ for my $version (sort { $a <=> $b } keys %deprecated) {
'ExtUtils::ParseXS' => 'blead',
'ExtUtils::ParseXS::Constants'=> 'blead',
'ExtUtils::ParseXS::CountLines'=> 'blead',
- 'ExtUtils::ParseXS::Eval'=> 'blead',
'ExtUtils::ParseXS::Utilities'=> 'blead',
'ExtUtils::Typemaps' => 'blead',
'ExtUtils::Typemaps::Cmd'=> 'blead',
@@ -8938,6 +9011,11 @@ for my $version (sort { $a <=> $b } keys %deprecated) {
'Locale::Maketext::GutsLoader'=> 'blead',
'Locale::Maketext::Simple'=> 'cpan',
'Locale::Script' => 'cpan',
+ 'Log::Message' => 'cpan',
+ 'Log::Message::Config' => 'cpan',
+ 'Log::Message::Handlers'=> 'cpan',
+ 'Log::Message::Item' => 'cpan',
+ 'Log::Message::Simple' => 'cpan',
'MIME::Base64' => 'cpan',
'MIME::QuotedPrint' => 'cpan',
'Math::BigFloat' => 'blead',
@@ -8992,6 +9070,8 @@ for my $version (sort { $a <=> $b } keys %deprecated) {
'Module::Load::Conditional'=> 'cpan',
'Module::Loaded' => 'cpan',
'Module::Metadata' => 'cpan',
+ 'Module::Pluggable' => 'cpan',
+ 'Module::Pluggable::Object'=> 'cpan',
'NEXT' => 'cpan',
'Net::Cmd' => undef,
'Net::Config' => undef,
@@ -9008,6 +9088,7 @@ for my $version (sort { $a <=> $b } keys %deprecated) {
'Net::Ping' => 'blead',
'Net::SMTP' => undef,
'Net::Time' => undef,
+ 'Object::Accessor' => 'cpan',
'Package::Constants' => 'cpan',
'Params::Check' => 'cpan',
'Parse::CPAN::Meta' => 'cpan',
@@ -9017,6 +9098,7 @@ for my $version (sort { $a <=> $b } keys %deprecated) {
'Pod::Escapes' => undef,
'Pod::Find' => 'cpan',
'Pod::InputObjects' => 'cpan',
+ 'Pod::LaTeX' => undef,
'Pod::Man' => 'cpan',
'Pod::ParseLink' => 'cpan',
'Pod::ParseUtils' => 'cpan',
@@ -9121,6 +9203,8 @@ for my $version (sort { $a <=> $b } keys %deprecated) {
'TAP::Parser::YAMLish::Writer'=> 'cpan',
'Term::ANSIColor' => 'cpan',
'Term::Cap' => undef,
+ 'Term::UI' => 'cpan',
+ 'Term::UI::History' => 'cpan',
'Test' => 'cpan',
'Test::Builder' => 'cpan',
'Test::Builder::Module' => 'cpan',
@@ -9131,6 +9215,7 @@ for my $version (sort { $a <=> $b } keys %deprecated) {
'Test::Simple' => 'cpan',
'Text::Balanced' => 'cpan',
'Text::ParseWords' => undef,
+ 'Text::Soundex' => undef,
'Text::Tabs' => 'cpan',
'Text::Wrap' => 'cpan',
'Thread::Queue' => 'blead',
@@ -9163,7 +9248,6 @@ for my $version (sort { $a <=> $b } keys %deprecated) {
'autodie::exception' => 'cpan',
'autodie::exception::system'=> 'cpan',
'autodie::hints' => 'cpan',
- 'autodie::skip' => 'cpan',
'base' => 'blead',
'bigint' => 'blead',
'bignum' => 'blead',
@@ -9190,6 +9274,7 @@ for my $version (sort { $a <=> $b } keys %deprecated) {
'App::Prove::State' => 'http://rt.cpan.org/Public/Dist/Display.html?Name=Test-Harness',
'App::Prove::State::Result'=> 'http://rt.cpan.org/Public/Dist/Display.html?Name=Test-Harness',
'App::Prove::State::Result::Test'=> 'http://rt.cpan.org/Public/Dist/Display.html?Name=Test-Harness',
+ 'Archive::Extract' => undef,
'Archive::Tar' => undef,
'Archive::Tar::Constant'=> undef,
'Archive::Tar::File' => undef,
@@ -9197,6 +9282,8 @@ for my $version (sort { $a <=> $b } keys %deprecated) {
'B::Concise' => undef,
'B::Debug' => undef,
'B::Deparse' => undef,
+ 'B::Lint' => undef,
+ 'B::Lint::Debug' => undef,
'CGI' => undef,
'CGI::Apache' => undef,
'CGI::Carp' => undef,
@@ -9248,6 +9335,47 @@ for my $version (sort { $a <=> $b } keys %deprecated) {
'CPAN::Tarzip' => undef,
'CPAN::URL' => undef,
'CPAN::Version' => undef,
+ 'CPANPLUS' => undef,
+ 'CPANPLUS::Backend' => undef,
+ 'CPANPLUS::Backend::RV' => undef,
+ 'CPANPLUS::Config' => undef,
+ 'CPANPLUS::Config::HomeEnv'=> undef,
+ 'CPANPLUS::Configure' => undef,
+ 'CPANPLUS::Configure::Setup'=> undef,
+ 'CPANPLUS::Dist' => undef,
+ 'CPANPLUS::Dist::Autobundle'=> undef,
+ 'CPANPLUS::Dist::Base' => undef,
+ 'CPANPLUS::Dist::Build' => undef,
+ 'CPANPLUS::Dist::Build::Constants'=> undef,
+ 'CPANPLUS::Dist::MM' => undef,
+ 'CPANPLUS::Dist::Sample'=> undef,
+ 'CPANPLUS::Error' => undef,
+ 'CPANPLUS::Internals' => undef,
+ 'CPANPLUS::Internals::Constants'=> undef,
+ 'CPANPLUS::Internals::Constants::Report'=> undef,
+ 'CPANPLUS::Internals::Extract'=> undef,
+ 'CPANPLUS::Internals::Fetch'=> undef,
+ 'CPANPLUS::Internals::Report'=> undef,
+ 'CPANPLUS::Internals::Search'=> undef,
+ 'CPANPLUS::Internals::Source'=> undef,
+ 'CPANPLUS::Internals::Source::Memory'=> undef,
+ 'CPANPLUS::Internals::Source::SQLite'=> undef,
+ 'CPANPLUS::Internals::Source::SQLite::Tie'=> undef,
+ 'CPANPLUS::Internals::Utils'=> undef,
+ 'CPANPLUS::Internals::Utils::Autoflush'=> undef,
+ 'CPANPLUS::Module' => undef,
+ 'CPANPLUS::Module::Author'=> undef,
+ 'CPANPLUS::Module::Author::Fake'=> undef,
+ 'CPANPLUS::Module::Checksums'=> undef,
+ 'CPANPLUS::Module::Fake'=> undef,
+ 'CPANPLUS::Module::Signature'=> undef,
+ 'CPANPLUS::Selfupdate' => undef,
+ 'CPANPLUS::Shell' => undef,
+ 'CPANPLUS::Shell::Classic'=> undef,
+ 'CPANPLUS::Shell::Default'=> undef,
+ 'CPANPLUS::Shell::Default::Plugins::CustomSource'=> undef,
+ 'CPANPLUS::Shell::Default::Plugins::Remote'=> undef,
+ 'CPANPLUS::Shell::Default::Plugins::Source'=> undef,
'Carp' => undef,
'Carp::Heavy' => undef,
'Compress::Raw::Bzip2' => undef,
@@ -9256,6 +9384,7 @@ for my $version (sort { $a <=> $b } keys %deprecated) {
'Config::Perl::V' => undef,
'Cwd' => undef,
'DB_File' => undef,
+ 'Devel::InnerPackage' => undef,
'Devel::PPPort' => undef,
'Digest' => undef,
'Digest::MD5' => undef,
@@ -9337,7 +9466,6 @@ for my $version (sort { $a <=> $b } keys %deprecated) {
'ExtUtils::ParseXS' => undef,
'ExtUtils::ParseXS::Constants'=> undef,
'ExtUtils::ParseXS::CountLines'=> undef,
- 'ExtUtils::ParseXS::Eval'=> undef,
'ExtUtils::ParseXS::Utilities'=> undef,
'ExtUtils::Typemaps' => undef,
'ExtUtils::Typemaps::Cmd'=> undef,
@@ -9429,6 +9557,11 @@ for my $version (sort { $a <=> $b } keys %deprecated) {
'Locale::Maketext::GutsLoader'=> undef,
'Locale::Maketext::Simple'=> undef,
'Locale::Script' => undef,
+ 'Log::Message' => undef,
+ 'Log::Message::Config' => undef,
+ 'Log::Message::Handlers'=> undef,
+ 'Log::Message::Item' => undef,
+ 'Log::Message::Simple' => undef,
'MIME::Base64' => undef,
'MIME::QuotedPrint' => undef,
'Math::BigFloat' => undef,
@@ -9483,6 +9616,8 @@ for my $version (sort { $a <=> $b } keys %deprecated) {
'Module::Load::Conditional'=> undef,
'Module::Loaded' => undef,
'Module::Metadata' => undef,
+ 'Module::Pluggable' => undef,
+ 'Module::Pluggable::Object'=> undef,
'NEXT' => undef,
'Net::Cmd' => undef,
'Net::Config' => undef,
@@ -9499,6 +9634,7 @@ for my $version (sort { $a <=> $b } keys %deprecated) {
'Net::Ping' => undef,
'Net::SMTP' => undef,
'Net::Time' => undef,
+ 'Object::Accessor' => undef,
'Package::Constants' => undef,
'Params::Check' => undef,
'Parse::CPAN::Meta' => 'https://rt.cpan.org/Public/Dist/Display.html?Name=Parse-CPAN-Meta',
@@ -9508,6 +9644,7 @@ for my $version (sort { $a <=> $b } keys %deprecated) {
'Pod::Escapes' => undef,
'Pod::Find' => undef,
'Pod::InputObjects' => undef,
+ 'Pod::LaTeX' => undef,
'Pod::Man' => undef,
'Pod::ParseLink' => undef,
'Pod::ParseUtils' => undef,
@@ -9612,6 +9749,8 @@ for my $version (sort { $a <=> $b } keys %deprecated) {
'TAP::Parser::YAMLish::Writer'=> 'http://rt.cpan.org/Public/Dist/Display.html?Name=Test-Harness',
'Term::ANSIColor' => undef,
'Term::Cap' => undef,
+ 'Term::UI' => undef,
+ 'Term::UI::History' => undef,
'Test' => undef,
'Test::Builder' => 'http://github.com/schwern/test-more/issues',
'Test::Builder::Module' => 'http://github.com/schwern/test-more/issues',
@@ -9622,6 +9761,7 @@ for my $version (sort { $a <=> $b } keys %deprecated) {
'Test::Simple' => 'http://github.com/schwern/test-more/issues',
'Text::Balanced' => undef,
'Text::ParseWords' => undef,
+ 'Text::Soundex' => undef,
'Text::Tabs' => undef,
'Text::Wrap' => undef,
'Thread::Queue' => undef,
@@ -9652,7 +9792,6 @@ for my $version (sort { $a <=> $b } keys %deprecated) {
'autodie::exception' => 'http://rt.cpan.org/NoAuth/Bugs.html?Dist=autodie',
'autodie::exception::system'=> 'http://rt.cpan.org/NoAuth/Bugs.html?Dist=autodie',
'autodie::hints' => 'http://rt.cpan.org/NoAuth/Bugs.html?Dist=autodie',
- 'autodie::skip' => 'http://rt.cpan.org/NoAuth/Bugs.html?Dist=autodie',
'base' => undef,
'bigint' => undef,
'bignum' => undef,
diff --git a/lib/Module/CoreList.pod b/lib/Module/CoreList.pod
index 8c7fa46..5de975f 100644
--- a/lib/Module/CoreList.pod
+++ b/lib/Module/CoreList.pod
@@ -197,7 +197,7 @@ Module::CoreList currently covers the 5.000, 5.001, 5.002, 5.003_07,
5.15.0, 5.15.1, 5.15.2, 5.15.3, 5.15.4, 5.15.5, 5.15.6, 5.15.7, 5.15.8,
5.15.9, 5.16.0, 5.16.1, 5.16.2, 5.16.3, 5.17.0, 5.17.1, 5.17.2, 5.17.3,
5.17.4, 5.17.5, 5.17.6, 5.17.7, 5.17.8, 5.17.9, 5.17.10, 5.17.11, 5.18.0,
-5.19.0, 5.19.1 and 5.19.2 releases of perl.
+5.19.0, 5.19.1, 5.19.2, 5.19.3 and 5.18.1 releases of perl.
=head1 HISTORY
diff --git a/lib/Module/CoreList/TieHashDelta.pm b/lib/Module/CoreList/TieHashDelta.pm
index e5c5d8b..5525675 100644
--- a/lib/Module/CoreList/TieHashDelta.pm
+++ b/lib/Module/CoreList/TieHashDelta.pm
@@ -3,7 +3,7 @@ package Module::CoreList::TieHashDelta;
use strict;
use vars qw($VERSION);
-$VERSION = "2.94";
+$VERSION = "2.96";
sub TIEHASH {
my ($class, $changed, $removed, $parent) = @_;
diff --git a/lib/Module/CoreList/Utils.pm b/lib/Module/CoreList/Utils.pm
new file mode 100644
index 0000000..1aa6d5b
--- /dev/null
+++ b/lib/Module/CoreList/Utils.pm
@@ -0,0 +1,986 @@
+package Module::CoreList::Utils;
+
+use strict;
+use warnings;
+use vars qw[$VERSION %utilities];
+use Module::CoreList;
+use Module::CoreList::TieHashDelta;
+
+$VERSION = '2.96';
+
+sub utilities {
+ my $perl = shift;
+ $perl = shift if eval { $perl->isa(__PACKAGE__) };
+ return unless $perl or exists $utilities{$perl};
+ return sort keys %{ $utilities{$perl} };
+}
+
+sub first_release_raw {
+ my $util = shift;
+ $util = shift if eval { $util->isa(__PACKAGE__) };
+ #and scalar @_ and $_[0] =~ m#\A[a-zA-Z_][0-9a-zA-Z_]*(?:(::|')[0-9a-zA-Z_]+)*\z#;
+ my $version = shift;
+
+ my @perls = $version
+ ? grep { exists $utilities{$_}{ $util } &&
+ $utilities{$_}{ $util } ge $version } keys %utilities
+ : grep { exists $utilities{$_}{ $util } } keys %utilities;
+
+ return grep { exists $Module::CoreList::released{$_} } @perls;
+}
+
+sub first_release_by_date {
+ my @perls = &first_release_raw;
+ return unless @perls;
+ return (sort { $Module::CoreList::released{$a} cmp $Module::CoreList::released{$b} } @perls)[0];
+}
+
+sub first_release {
+ my @perls = &first_release_raw;
+ return unless @perls;
+ return (sort { $a cmp $b } @perls)[0];
+}
+
+sub removed_from {
+ my @perls = &removed_raw;
+ return shift @perls;
+}
+
+sub removed_from_by_date {
+ my @perls = sort { $Module::CoreList::released{$a} cmp $Module::CoreList::released{$b} } &removed_raw;
+ return shift @perls;
+}
+
+sub removed_raw {
+ my $util = shift;
+ $util = shift if eval { $util->isa(__PACKAGE__) };
+ return unless my @perls = sort { $a cmp $b } first_release_raw($util);
+ @perls = grep { exists $Module::CoreList::released{$_} } @perls;
+ my $last = pop @perls;
+ my @removed = grep { $_ > $last } sort { $a cmp $b } keys %utilities;
+ return @removed;
+}
+
+my %delta = (
+ 5 => {
+ changed => {
+ 'a2p' => '1',
+ 'c2ph' => '1',
+ 'cppstdin' => '1',
+ 'find2perl' => '1',
+ 'pstruct' => '1',
+ 's2p' => '1',
+ },
+ removed => {
+ }
+ },
+
+ 5.001 => {
+ delta_from => 5,
+ changed => {
+ 'h2xs' => '1',
+ },
+ removed => {
+ }
+ },
+
+ 5.002 => {
+ delta_from => 5.001,
+ changed => {
+ 'h2ph' => '1',
+ 'perlbug' => '1',
+ 'perldoc' => '1',
+ 'pod2html' => '1',
+ 'pod2latex' => '1',
+ 'pod2man' => '1',
+ 'pod2text' => '1',
+ },
+ removed => {
+ }
+ },
+
+ 5.00307 => {
+ delta_from => 5.002,
+ changed => {
+ 'pl2pm' => '1',
+ },
+ removed => {
+ 'cppstdin' => 1,
+ 'pstruct' => 1,
+ }
+ },
+
+ 5.004 => {
+ delta_from => 5.00307,
+ changed => {
+ 'splain' => '1',
+ },
+ removed => {
+ }
+ },
+
+ 5.005 => {
+ delta_from => 5.00405,
+ changed => {
+ 'perlcc' => '1',
+ },
+ removed => {
+ }
+ },
+
+ 5.00503 => {
+ delta_from => 5.005,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.00405 => {
+ delta_from => 5.004,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.006 => {
+ delta_from => 5.00504,
+ changed => {
+ 'dprofpp' => '1',
+ 'pod2usage' => '1',
+ 'podchecker' => '1',
+ 'podselect' => '1',
+ 'pstruct' => '1',
+ },
+ removed => {
+ }
+ },
+
+ 5.006001 => {
+ delta_from => 5.006,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.007003 => {
+ delta_from => 5.006002,
+ changed => {
+ 'libnetcfg' => '1',
+ 'perlivp' => '1',
+ 'psed' => '1',
+ 'xsubpp' => '1',
+ },
+ removed => {
+ }
+ },
+
+ 5.008 => {
+ delta_from => 5.007003,
+ changed => {
+ 'enc2xs' => '1',
+ 'piconv' => '1',
+ },
+ removed => {
+ }
+ },
+
+ 5.008001 => {
+ delta_from => 5.008,
+ changed => {
+ 'cpan' => '1',
+ },
+ removed => {
+ }
+ },
+
+ 5.009 => {
+ delta_from => 5.008009,
+ changed => {
+ },
+ removed => {
+ 'corelist' => 1,
+ 'instmodsh' => 1,
+ 'prove' => 1,
+ }
+ },
+
+ 5.008002 => {
+ delta_from => 5.008001,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.006002 => {
+ delta_from => 5.006001,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.008003 => {
+ delta_from => 5.008002,
+ changed => {
+ 'instmodsh' => '1',
+ 'prove' => '1',
+ },
+ removed => {
+ }
+ },
+
+ 5.00504 => {
+ delta_from => 5.00503,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.009001 => {
+ delta_from => 5.009,
+ changed => {
+ 'instmodsh' => '1',
+ 'prove' => '1',
+ },
+ removed => {
+ }
+ },
+
+ 5.008004 => {
+ delta_from => 5.008003,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.008005 => {
+ delta_from => 5.008004,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.008006 => {
+ delta_from => 5.008005,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.009002 => {
+ delta_from => 5.009001,
+ changed => {
+ 'corelist' => '1',
+ },
+ removed => {
+ }
+ },
+
+ 5.008007 => {
+ delta_from => 5.008006,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.009003 => {
+ delta_from => 5.009002,
+ changed => {
+ 'ptar' => '1',
+ 'ptardiff' => '1',
+ 'shasum' => '1',
+ },
+ removed => {
+ }
+ },
+
+ 5.008008 => {
+ delta_from => 5.008007,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.009004 => {
+ delta_from => 5.009003,
+ changed => {
+ 'config_data' => '1',
+ },
+ removed => {
+ }
+ },
+
+ 5.009005 => {
+ delta_from => 5.009004,
+ changed => {
+ 'cpan2dist' => '1',
+ 'cpanp' => '1',
+ 'cpanp-run-perl' => '1',
+ },
+ removed => {
+ 'perlcc' => 1,
+ }
+ },
+
+ 5.010000 => {
+ delta_from => 5.009005,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.008009 => {
+ delta_from => 5.008008,
+ changed => {
+ 'corelist' => '1',
+ },
+ removed => {
+ }
+ },
+
+ 5.010001 => {
+ delta_from => 5.010000,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.011 => {
+ delta_from => 5.010001,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.011001 => {
+ delta_from => 5.011,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.011002 => {
+ delta_from => 5.011001,
+ changed => {
+ 'perlthanks' => '1',
+ },
+ removed => {
+ }
+ },
+
+ 5.011003 => {
+ delta_from => 5.011002,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.011004 => {
+ delta_from => 5.011003,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.011005 => {
+ delta_from => 5.011004,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.012 => {
+ delta_from => 5.011005,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.013 => {
+ delta_from => 5.012005,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.012001 => {
+ delta_from => 5.012,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.013001 => {
+ delta_from => 5.013,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.013002 => {
+ delta_from => 5.013001,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.013003 => {
+ delta_from => 5.013002,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.013004 => {
+ delta_from => 5.013003,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.012002 => {
+ delta_from => 5.012001,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.013005 => {
+ delta_from => 5.013004,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.013006 => {
+ delta_from => 5.013005,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.013007 => {
+ delta_from => 5.013006,
+ changed => {
+ 'ptargrep' => '1',
+ },
+ removed => {
+ }
+ },
+
+ 5.013008 => {
+ delta_from => 5.013007,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.013009 => {
+ delta_from => 5.013008,
+ changed => {
+ 'json_pp' => '1',
+ },
+ removed => {
+ }
+ },
+
+ 5.012003 => {
+ delta_from => 5.012002,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.013010 => {
+ delta_from => 5.013009,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.013011 => {
+ delta_from => 5.013010,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.014 => {
+ delta_from => 5.013011,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.014001 => {
+ delta_from => 5.014,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.015 => {
+ delta_from => 5.014004,
+ changed => {
+ },
+ removed => {
+ 'dprofpp' => 1,
+ }
+ },
+
+ 5.012004 => {
+ delta_from => 5.012003,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.015001 => {
+ delta_from => 5.015,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.015002 => {
+ delta_from => 5.015001,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.015003 => {
+ delta_from => 5.015002,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.014002 => {
+ delta_from => 5.014001,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.015004 => {
+ delta_from => 5.015003,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.015005 => {
+ delta_from => 5.015004,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.015006 => {
+ delta_from => 5.015005,
+ changed => {
+ 'zipdetails' => '1',
+ },
+ removed => {
+ }
+ },
+
+ 5.015007 => {
+ delta_from => 5.015006,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.015008 => {
+ delta_from => 5.015007,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.015009 => {
+ delta_from => 5.015008,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.016 => {
+ delta_from => 5.015009,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.017 => {
+ delta_from => 5.016003,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.017001 => {
+ delta_from => 5.017,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.017002 => {
+ delta_from => 5.017001,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.016001 => {
+ delta_from => 5.016,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.017003 => {
+ delta_from => 5.017002,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.017004 => {
+ delta_from => 5.017003,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.014003 => {
+ delta_from => 5.014002,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.017005 => {
+ delta_from => 5.017004,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.016002 => {
+ delta_from => 5.016001,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.012005 => {
+ delta_from => 5.012004,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.017006 => {
+ delta_from => 5.017005,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.017007 => {
+ delta_from => 5.017006,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.017008 => {
+ delta_from => 5.017007,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.017009 => {
+ delta_from => 5.017008,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.014004 => {
+ delta_from => 5.014003,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.016003 => {
+ delta_from => 5.016002,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.017010 => {
+ delta_from => 5.017009,
+ changed => {
+ },
+ removed => {
+ }
+ },
+
+ 5.017011 => {
+ delta_from => 5.017010,
+ changed => {
+ },
+ removed => {
+ }
+ },
+ 5.018000 => {
+ delta_from => 5.017011,
+ changed => {
+ },
+ removed => {
+ }
+ },
+ 5.018001 => {
+ delta_from => 5.018000,
+ changed => {
+ },
+ removed => {
+ }
+ },
+ 5.019000 => {
+ delta_from => 5.018000,
+ changed => {
+ },
+ removed => {
+ 'cpan2dist' => '1',
+ 'cpanp' => '1',
+ 'cpanp-run-perl' => '1',
+ 'pod2latex' => '1',
+ }
+ },
+ 5.019001 => {
+ delta_from => 5.019000,
+ changed => {
+ },
+ removed => {
+ }
+ },
+ 5.019002 => {
+ delta_from => 5.019001,
+ changed => {
+ },
+ removed => {
+ }
+ },
+ 5.019003 => {
+ delta_from => 5.019002,
+ changed => {
+ },
+ removed => {
+ }
+ },
+);
+
+for my $version (sort { $a <=> $b } keys %delta) {
+ my $data = $delta{$version};
+
+ tie %{$utilities{$version}}, 'Module::CoreList::TieHashDelta',
+ $data->{changed}, $data->{removed},
+ $data->{delta_from} ? $utilities{$data->{delta_from}} : undef;
+}
+
+# Create aliases with trailing zeros for $] use
+
+$utilities{'5.000'} = $utilities{5};
+
+_create_aliases(\%utilities);
+
+sub _create_aliases {
+ my ($hash) = @_;
+
+ for my $version (keys %$hash) {
+ next unless $version >= 5.010;
+
+ my $padded = sprintf "%0.6f", $version;
+
+ # If the version in string form isn't the same as the numeric version,
+ # alias it.
+ if ($padded ne $version && $version == $padded) {
+ $hash->{$padded} = $hash->{$version};
+ }
+ }
+}
+
+'foo';
+
+=pod
+
+=head1 NAME
+
+Module::CoreList::Utils - what utilities shipped with versions of perl
+
+=head1 SYNOPSIS
+
+ use Module::CoreList::Utils;
+
+ print $Module::CoreList::Utils::utilities{5.009003}{ptar}; # prints 1
+
+ print Module::CoreList::Utils->first_release('corelist'); # prints 5.008009
+ print Module::CoreList::Utils->first_release_by_date('corelist'); # prints 5.009002
+
+=head1 DESCRIPTION
+
+Module::CoreList::Utils provides information on which core and dual-life utilities shipped
+with each version of L<perl>.
+
+It provides a number of mechanisms for querying this information.
+
+There is a functional programming API available for programmers to query
+information.
+
+Programmers may also query the contained hash structure to find relevant
+information.
+
+=head1 FUNCTIONS API
+
+These are the functions that are available, they may either be called as functions or class methods:
+
+ Module::CoreList::Utils::first_release('corelist'); # as a function
+
+ Module::CoreList::Utils->first_release('corelist'); # class method
+
+=over
+
+=item C<utilities>
+
+Requires a perl version as an argument, returns a list of utilities that shipped with
+that version of perl, or undef/empty list if that perl doesn't exist.
+
+=item C<first_release( UTILITY )>
+
+Requires a UTILITY name as an argument, returns the perl version when that utility first
+appeared in core as ordered by perl version number or undef ( in scalar context )
+or an empty list ( in list context ) if that utility is not in core.
+
+=item C<first_release_by_date( UTILITY )>
+
+Requires a UTILITY name as an argument, returns the perl version when that utility first
+appeared in core as ordered by release date or undef ( in scalar context )
+or an empty list ( in list context ) if that utility is not in core.
+
+=item C<removed_from( UTILITY )>
+
+Takes a UTILITY name as an argument, returns the first perl version where that utility
+was removed from core. Returns undef if the given utility was never in core or remains
+in core.
+
+=item C<removed_from_by_date( UTILITY )>
+
+Takes a UTILITY name as an argument, returns the first perl version by release date where that
+utility was removed from core. Returns undef if the given utility was never in core or remains
+in core.
+
+=back
+
+=head1 DATA STRUCTURES
+
+These are the hash data structures that are available:
+
+=over
+
+=item C<%Module::CoreList::Utils::utilities>
+
+A hash of hashes that is keyed on perl version as indicated
+in $]. The second level hash is utility / defined pairs.
+
+=back
+
+=head1 AUTHOR
+
+Chris C<BinGOs> Williams <chris at bingosnet.co.uk>
+
+Currently maintained by the perl 5 porters E<lt>perl5-porters at perl.orgE<gt>.
+
+This module is the result of archaeology undertaken during QA Hackathon
+in Lancaster, April 2013.
+
+=head1 LICENSE
+
+Copyright (C) 2013 Chris Williams. All Rights Reserved.
+
+This module is free software; you can redistribute it and/or modify it
+under the same terms as Perl itself.
+
+=head1 SEE ALSO
+
+L<corelist>, L<Module::CoreList>, L<perl>, L<http://perlpunks.de/corelist>
+
+=cut
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libmodule-corelist-perl.git
More information about the Pkg-perl-cvs-commits
mailing list