summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorYves Orton <demerphq@gmail.com>2023-03-02 13:14:57 +0100
committerYves Orton <demerphq@gmail.com>2023-03-02 22:23:02 +0800
commitbe92c2d20437d1550fe5f66e5e2e27c63ddf3b2b (patch)
treeb7d658db4c41a92974494c3e48e4ea3eb513da45
parentaeac6656432abc7c867314cb1ce8319321d6cdef (diff)
downloadperl-be92c2d20437d1550fe5f66e5e2e27c63ddf3b2b.tar.gz
cpan/Config-Perl-V - update to 0.36
-rw-r--r--MANIFEST1
-rw-r--r--cpan/Config-Perl-V/V.pm40
-rw-r--r--cpan/Config-Perl-V/t/20_plv56.t2
-rw-r--r--cpan/Config-Perl-V/t/21_plv58.t2
-rw-r--r--cpan/Config-Perl-V/t/22_plv510.t2
-rw-r--r--cpan/Config-Perl-V/t/23_plv512.t2
-rw-r--r--cpan/Config-Perl-V/t/24_plv514.t2
-rw-r--r--cpan/Config-Perl-V/t/25_plv516.t2
-rw-r--r--cpan/Config-Perl-V/t/25_plv5162.t2
-rw-r--r--cpan/Config-Perl-V/t/26_plv518.t2
-rw-r--r--cpan/Config-Perl-V/t/26_plv5182.t2
-rw-r--r--cpan/Config-Perl-V/t/27_plv5200.t2
-rw-r--r--cpan/Config-Perl-V/t/27_plv5202.t2
-rw-r--r--cpan/Config-Perl-V/t/28_plv5220.t2
-rw-r--r--cpan/Config-Perl-V/t/28_plv52201w.t2
-rw-r--r--cpan/Config-Perl-V/t/29_plv5235w.t2
-rw-r--r--cpan/Config-Perl-V/t/30_plv5240.t2
-rw-r--r--cpan/Config-Perl-V/t/31_plv52511.t2
-rw-r--r--cpan/Config-Perl-V/t/32_plv5261rc1.t2
-rw-r--r--cpan/Config-Perl-V/t/33_plv52711r.t2
-rw-r--r--cpan/Config-Perl-V/t/34_plv5280.t2
-rw-r--r--cpan/Config-Perl-V/t/35_plv52910g.t2
-rw-r--r--cpan/Config-Perl-V/t/36_plv5300.t2
-rw-r--r--cpan/Config-Perl-V/t/37_plv53111qm.t2
-rw-r--r--cpan/Config-Perl-V/t/38_plv5320tld.t2
-rw-r--r--cpan/Config-Perl-V/t/39_plv5340tqm.t2
-rw-r--r--cpan/Config-Perl-V/t/40_plv5358dnqm.t2
-rw-r--r--cpan/Config-Perl-V/t/41_plv5360dnqm.t2
-rw-r--r--cpan/Config-Perl-V/t/42_plv5373tld.t2
-rw-r--r--cpan/Config-Perl-V/t/43_plv53710rcs.t202
30 files changed, 257 insertions, 40 deletions
diff --git a/MANIFEST b/MANIFEST
index a580456695..6519246cb9 100644
--- a/MANIFEST
+++ b/MANIFEST
@@ -294,6 +294,7 @@ cpan/Config-Perl-V/t/39_plv5340tqm.t Config::Perl::V
cpan/Config-Perl-V/t/40_plv5358dnqm.t Config::Perl::V
cpan/Config-Perl-V/t/41_plv5360dnqm.t Config::Perl::V
cpan/Config-Perl-V/t/42_plv5373tld.t Config::Perl::V
+cpan/Config-Perl-V/t/43_plv53710rcs.t
cpan/Config-Perl-V/V.pm Config::Perl::V
cpan/CPAN/lib/App/Cpan.pm helper package for CPAN.pm
cpan/CPAN/lib/CPAN.pm Interface to Comprehensive Perl Archive Network
diff --git a/cpan/Config-Perl-V/V.pm b/cpan/Config-Perl-V/V.pm
index 5e40008809..d8fd2a8e4e 100644
--- a/cpan/Config-Perl-V/V.pm
+++ b/cpan/Config-Perl-V/V.pm
@@ -6,7 +6,7 @@ use warnings;
use Config;
use Exporter;
use vars qw($VERSION @ISA @EXPORT_OK %EXPORT_TAGS);
-$VERSION = "0.35";
+$VERSION = "0.36";
@ISA = qw( Exporter );
@EXPORT_OK = qw( plv2hash summary myconfig signature );
%EXPORT_TAGS = (
@@ -59,6 +59,7 @@ my %BTD = map {( $_ => 0 )} qw(
PERL_PERTURB_KEYS_DISABLED
PERL_PERTURB_KEYS_RANDOM
PERL_PRESERVE_IVUV
+ PERL_RC_STACK
PERL_RELOCATABLE_INCPUSH
PERL_USE_DEVEL
PERL_USE_SAFE_PUTENV
@@ -269,7 +270,10 @@ sub plv2hash {
$config{$k} = $v;
}
- if (my %kv = ($pv =~ m{\b
+ my %kv;
+ if ($pv =~ m{\S,? (?:osvers|archname)=}) { # attr is not the first on the line
+ # up to and including 5.24, a line could have multiple kv pairs
+ %kv = ($pv =~ m{\b
(\w+) # key
\s*= # assign
( '\s*[^']*?\s*' # quoted value
@@ -277,17 +281,27 @@ sub plv2hash {
| \S+ # unquoted value
| \s*\n # empty
)
- (?:,?\s+|\s*\n)? # separator (5.8.x reports did not have a ','
- }gx)) { # between every kv pair
-
- while (my ($k, $v) = each %kv) {
- $k =~ s{\s+$} {};
- $v =~ s{\s*\n\z} {};
- $v =~ s{,$} {};
- $v =~ m{^'(.*)'$} and $v = $1;
- $v =~ s{\s+$} {};
- $config{$k} = $v;
- }
+ (?:,?\s+|\s*\n)? # optional separator (5.8.x reports did
+ }gx); # not have a ',' between every kv pair)
+ }
+ else {
+ # as of 5.25, each kv pair is listed on its own line
+ %kv = ($pv =~ m{^
+ \s+
+ (\w+) # key
+ \s*=\s* # assign
+ (.*?) # value
+ \s*,?\s*$
+ }gmx);
+ }
+
+ while (my ($k, $v) = each %kv) {
+ $k =~ s{\s+$} {};
+ $v =~ s{\s*\n\z} {};
+ $v =~ s{,$} {};
+ $v =~ m{^'(.*)'$} and $v = $1;
+ $v =~ s{\s+$} {};
+ $config{$k} = $v;
}
my $build = { %empty_build };
diff --git a/cpan/Config-Perl-V/t/20_plv56.t b/cpan/Config-Perl-V/t/20_plv56.t
index ddb3884300..23060968d8 100644
--- a/cpan/Config-Perl-V/t/20_plv56.t
+++ b/cpan/Config-Perl-V/t/20_plv56.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 105;
+ my $tests = 106;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/21_plv58.t b/cpan/Config-Perl-V/t/21_plv58.t
index 50f9e967f1..9ec8a9afb4 100644
--- a/cpan/Config-Perl-V/t/21_plv58.t
+++ b/cpan/Config-Perl-V/t/21_plv58.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 105;
+ my $tests = 106;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/22_plv510.t b/cpan/Config-Perl-V/t/22_plv510.t
index 07428bca03..55efc6a2ca 100644
--- a/cpan/Config-Perl-V/t/22_plv510.t
+++ b/cpan/Config-Perl-V/t/22_plv510.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 104;
+ my $tests = 105;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/23_plv512.t b/cpan/Config-Perl-V/t/23_plv512.t
index 06e7917e27..8b0cc3765b 100644
--- a/cpan/Config-Perl-V/t/23_plv512.t
+++ b/cpan/Config-Perl-V/t/23_plv512.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 106;
+ my $tests = 107;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/24_plv514.t b/cpan/Config-Perl-V/t/24_plv514.t
index d2e177552a..7ac1c2205a 100644
--- a/cpan/Config-Perl-V/t/24_plv514.t
+++ b/cpan/Config-Perl-V/t/24_plv514.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 106;
+ my $tests = 107;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/25_plv516.t b/cpan/Config-Perl-V/t/25_plv516.t
index 0fe1a865f4..2dd1ab1e2e 100644
--- a/cpan/Config-Perl-V/t/25_plv516.t
+++ b/cpan/Config-Perl-V/t/25_plv516.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 105;
+ my $tests = 106;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/25_plv5162.t b/cpan/Config-Perl-V/t/25_plv5162.t
index a6f443467e..9e534ba193 100644
--- a/cpan/Config-Perl-V/t/25_plv5162.t
+++ b/cpan/Config-Perl-V/t/25_plv5162.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 163;
+ my $tests = 164;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/26_plv518.t b/cpan/Config-Perl-V/t/26_plv518.t
index 6e4d6109f1..7d54c29adf 100644
--- a/cpan/Config-Perl-V/t/26_plv518.t
+++ b/cpan/Config-Perl-V/t/26_plv518.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 124;
+ my $tests = 125;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/26_plv5182.t b/cpan/Config-Perl-V/t/26_plv5182.t
index 0cedea3f10..dd734b7cde 100644
--- a/cpan/Config-Perl-V/t/26_plv5182.t
+++ b/cpan/Config-Perl-V/t/26_plv5182.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 124;
+ my $tests = 125;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/27_plv5200.t b/cpan/Config-Perl-V/t/27_plv5200.t
index fcfb53f1ab..6ba124f144 100644
--- a/cpan/Config-Perl-V/t/27_plv5200.t
+++ b/cpan/Config-Perl-V/t/27_plv5200.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 124;
+ my $tests = 125;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/27_plv5202.t b/cpan/Config-Perl-V/t/27_plv5202.t
index 20dad25887..8c0ff480bf 100644
--- a/cpan/Config-Perl-V/t/27_plv5202.t
+++ b/cpan/Config-Perl-V/t/27_plv5202.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 125;
+ my $tests = 126;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/28_plv5220.t b/cpan/Config-Perl-V/t/28_plv5220.t
index 301b1c44f1..a081074b0d 100644
--- a/cpan/Config-Perl-V/t/28_plv5220.t
+++ b/cpan/Config-Perl-V/t/28_plv5220.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 125;
+ my $tests = 126;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/28_plv52201w.t b/cpan/Config-Perl-V/t/28_plv52201w.t
index 5b28c3fcbd..9cd2924a66 100644
--- a/cpan/Config-Perl-V/t/28_plv52201w.t
+++ b/cpan/Config-Perl-V/t/28_plv52201w.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 125;
+ my $tests = 126;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/29_plv5235w.t b/cpan/Config-Perl-V/t/29_plv5235w.t
index 6cf60e4646..d3d8d989ae 100644
--- a/cpan/Config-Perl-V/t/29_plv5235w.t
+++ b/cpan/Config-Perl-V/t/29_plv5235w.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 125;
+ my $tests = 126;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/30_plv5240.t b/cpan/Config-Perl-V/t/30_plv5240.t
index 23d819eac8..ecb475bf82 100644
--- a/cpan/Config-Perl-V/t/30_plv5240.t
+++ b/cpan/Config-Perl-V/t/30_plv5240.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 133;
+ my $tests = 134;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/31_plv52511.t b/cpan/Config-Perl-V/t/31_plv52511.t
index 4ecd92e25d..a1f902dacb 100644
--- a/cpan/Config-Perl-V/t/31_plv52511.t
+++ b/cpan/Config-Perl-V/t/31_plv52511.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 133;
+ my $tests = 134;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/32_plv5261rc1.t b/cpan/Config-Perl-V/t/32_plv5261rc1.t
index c42cee647a..d59ea21552 100644
--- a/cpan/Config-Perl-V/t/32_plv5261rc1.t
+++ b/cpan/Config-Perl-V/t/32_plv5261rc1.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 133;
+ my $tests = 134;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/33_plv52711r.t b/cpan/Config-Perl-V/t/33_plv52711r.t
index 21e992c1ac..61469ba320 100644
--- a/cpan/Config-Perl-V/t/33_plv52711r.t
+++ b/cpan/Config-Perl-V/t/33_plv52711r.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 133;
+ my $tests = 134;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/34_plv5280.t b/cpan/Config-Perl-V/t/34_plv5280.t
index 8e58e03a84..09ee311211 100644
--- a/cpan/Config-Perl-V/t/34_plv5280.t
+++ b/cpan/Config-Perl-V/t/34_plv5280.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 133;
+ my $tests = 134;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/35_plv52910g.t b/cpan/Config-Perl-V/t/35_plv52910g.t
index a85c3a6cdd..e9a0404603 100644
--- a/cpan/Config-Perl-V/t/35_plv52910g.t
+++ b/cpan/Config-Perl-V/t/35_plv52910g.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 133;
+ my $tests = 134;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/36_plv5300.t b/cpan/Config-Perl-V/t/36_plv5300.t
index bc2b2f3d66..670aa1d0a5 100644
--- a/cpan/Config-Perl-V/t/36_plv5300.t
+++ b/cpan/Config-Perl-V/t/36_plv5300.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 133;
+ my $tests = 134;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/37_plv53111qm.t b/cpan/Config-Perl-V/t/37_plv53111qm.t
index cb23580a22..4d234fe1be 100644
--- a/cpan/Config-Perl-V/t/37_plv53111qm.t
+++ b/cpan/Config-Perl-V/t/37_plv53111qm.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 133;
+ my $tests = 134;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/38_plv5320tld.t b/cpan/Config-Perl-V/t/38_plv5320tld.t
index f71d6190c1..4edefd5c18 100644
--- a/cpan/Config-Perl-V/t/38_plv5320tld.t
+++ b/cpan/Config-Perl-V/t/38_plv5320tld.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 133;
+ my $tests = 134;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/39_plv5340tqm.t b/cpan/Config-Perl-V/t/39_plv5340tqm.t
index 1a78d46276..c4ba00e09f 100644
--- a/cpan/Config-Perl-V/t/39_plv5340tqm.t
+++ b/cpan/Config-Perl-V/t/39_plv5340tqm.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 133;
+ my $tests = 134;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/40_plv5358dnqm.t b/cpan/Config-Perl-V/t/40_plv5358dnqm.t
index 2f2be2ea7d..00a9462e8f 100644
--- a/cpan/Config-Perl-V/t/40_plv5358dnqm.t
+++ b/cpan/Config-Perl-V/t/40_plv5358dnqm.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 133;
+ my $tests = 134;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/41_plv5360dnqm.t b/cpan/Config-Perl-V/t/41_plv5360dnqm.t
index 8078d2a078..ef63f1524b 100644
--- a/cpan/Config-Perl-V/t/41_plv5360dnqm.t
+++ b/cpan/Config-Perl-V/t/41_plv5360dnqm.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 133;
+ my $tests = 134;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/42_plv5373tld.t b/cpan/Config-Perl-V/t/42_plv5373tld.t
index 47f8067410..866ef1b35c 100644
--- a/cpan/Config-Perl-V/t/42_plv5373tld.t
+++ b/cpan/Config-Perl-V/t/42_plv5373tld.t
@@ -5,7 +5,7 @@ use warnings;
BEGIN {
use Test::More;
- my $tests = 134;
+ my $tests = 135;
unless ($ENV{PERL_CORE}) {
require Test::NoWarnings;
Test::NoWarnings->import ();
diff --git a/cpan/Config-Perl-V/t/43_plv53710rcs.t b/cpan/Config-Perl-V/t/43_plv53710rcs.t
new file mode 100644
index 0000000000..ee0cecb50d
--- /dev/null
+++ b/cpan/Config-Perl-V/t/43_plv53710rcs.t
@@ -0,0 +1,202 @@
+#!/pro/bin/perl
+
+use strict;
+use warnings;
+
+BEGIN {
+ use Test::More;
+ my $tests = 135;
+ unless ($ENV{PERL_CORE}) {
+ require Test::NoWarnings;
+ Test::NoWarnings->import ();
+ $tests++;
+ }
+
+ plan tests => $tests;
+ }
+
+use Config::Perl::V qw( summary );
+
+ok (my $conf = Config::Perl::V::plv2hash (<DATA>), "Read perl -v block");
+ok (exists $conf->{$_}, "Has $_ entry") for qw( build environment config inc );
+
+is ($conf->{build}{osname}, $conf->{config}{osname}, "osname");
+is ($conf->{build}{stamp}, "Feb 28 2023 18:30:03", "Build time");
+is ($conf->{config}{version}, "5.37.10", "reconstructed \$Config{version}");
+
+my $opt = Config::Perl::V::plv2hash ("")->{build}{options};
+foreach my $o (sort qw(
+ DEBUGGING HAS_TIMES MULTIPLICITY PERL_COPY_ON_WRITE PERL_RC_STACK
+ PERL_DONT_CREATE_GVSV PERL_HASH_FUNC_SIPHASH13 PERL_HASH_USE_SBOX32
+ PERLIO_LAYERS PERL_MALLOC_WRAP PERL_OP_PARENT PERL_PRESERVE_IVUV
+ PERL_TRACK_MEMPOOL PERL_USE_DEVEL PERL_USE_SAFE_PUTENV USE_64_BIT_ALL
+ USE_64_BIT_INT USE_ITHREADS USE_LARGE_FILES USE_LOCALE
+ USE_LOCALE_COLLATE USE_LOCALE_CTYPE USE_LOCALE_NUMERIC USE_LOCALE_TIME
+ USE_LONG_DOUBLE USE_PERL_ATOF USE_PERLIO USE_REENTRANT_API
+ USE_THREAD_SAFE_LOCALE
+ )) {
+ is ($conf->{build}{options}{$o}, 1, "Runtime option $o set");
+ delete $opt->{$o};
+ }
+foreach my $o (sort keys %$opt) {
+ is ($conf->{build}{options}{$o}, 0, "Runtime option $o unset");
+ }
+
+eval { require Digest::MD5; };
+my $md5 = $@ ? "0" x 32 : "964776ac5595a8a584dfba7ee063e4b9";
+ok (my $sig = Config::Perl::V::signature ($conf), "Get signature");
+
+SKIP: {
+ ord "A" == 65 or skip "ASCII-centric test", 1;
+ is ($sig, $md5, "MD5");
+ }
+
+is_deeply ($conf->{build}{patches}, [ "uncommitted-changes" ], "No patches");
+
+my %check = (
+ alignbytes => 16,
+ api_version => 37,
+ bincompat5005 => undef, # GONE, chainsawed
+ byteorder => 12345678,
+ cc => "cc",
+ cccdlflags => "-fPIC",
+ ccdlflags => "-Wl,-E",
+ config_args => "-Dusedevel -Duse64bitall -Dusethreads -Duseithreads -Duselongdouble -Doptimize='-O0\\ -g' -Accflags=-DPERL_RC_STACK -des",
+ gccversion => "12.2.1 20230124 [revision 193f7e62815b4089dfaed4c2bd34fd4f10209e27]",
+ gnulibc_version => "2.37",
+ ivsize => 8,
+ ivtype => "long",
+ ld => "cc",
+ lddlflags => "-shared -O0 -g -L/pro/local/lib -fstack-protector-strong",
+ ldflags => "-L/pro/local/lib -fstack-protector-strong",
+ libc => "/lib/../lib64/libc.so.6",
+ lseektype => "off_t",
+ osvers => "6.1.12-1-default",
+ use64bitall => "define",
+ use64bitint => "define",
+ usemymalloc => "n",
+ default_inc_excludes_dot
+ => "define",
+ );
+is ($conf->{config}{$_}, $check{$_}, "reconstructed \$Config{$_}") for sort keys %check;
+
+ok (my $info = summary ($conf), "A summary");
+ok (exists $info->{$_}, "Summary has $_") for qw( cc config_args usemymalloc default_inc_excludes_dot );
+is ($info->{default_inc_excludes_dot}, "define", "This build has . NOT in INC");
+
+__END__
+Summary of my perl5 (revision 5 version 37 subversion 10) configuration:
+ Derived from: f0cf813c73daf1ae652b454fc8bc4828aec1f049
+ Platform:
+ osname=linux
+ osvers=6.1.12-1-default
+ archname=x86_64-linux-thread-multi-ld
+ uname='linux lx09 6.1.12-1-default #1 smp preempt_dynamic wed feb 15 05:31:41 utc 2023 (373f017) x86_64 x86_64 x86_64 gnulinux '
+ config_args='-Dusedevel -Duse64bitall -Dusethreads -Duseithreads -Duselongdouble -Doptimize='-O0\ -g' -Accflags=-DPERL_RC_STACK -des'
+ hint=recommended
+ useposix=true
+ d_sigaction=define
+ useithreads=define
+ usemultiplicity=define
+ use64bitint=define
+ use64bitall=define
+ uselongdouble=define
+ usemymalloc=n
+ default_inc_excludes_dot=define
+ Compiler:
+ cc='cc'
+ ccflags ='-D_REENTRANT -D_GNU_SOURCE -pie -fPIE -fPIC -DDEBUGGING -DPERL_RC_STACK -fwrapv -fno-strict-aliasing -pipe -fstack-protector-strong -I/pro/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -D_FORTIFY_SOURCE=2'
+ optimize='-O0 -g'
+ cppflags='-D_REENTRANT -D_GNU_SOURCE -pie -fPIE -fPIC -DDEBUGGING -DPERL_RC_STACK -fwrapv -fno-strict-aliasing -pipe -fstack-protector-strong -I/pro/local/include'
+ ccversion=''
+ gccversion='12.2.1 20230124 [revision 193f7e62815b4089dfaed4c2bd34fd4f10209e27]'
+ gccosandvers=''
+ intsize=4
+ longsize=8
+ ptrsize=8
+ doublesize=8
+ byteorder=12345678
+ doublekind=3
+ d_longlong=define
+ longlongsize=8
+ d_longdbl=define
+ longdblsize=16
+ longdblkind=3
+ ivtype='long'
+ ivsize=8
+ nvtype='long double'
+ nvsize=16
+ Off_t='off_t'
+ lseeksize=8
+ alignbytes=16
+ prototype=define
+ Linker and Libraries:
+ ld='cc'
+ ldflags ='-L/pro/local/lib -fstack-protector-strong'
+ libpth=/usr/local/lib /usr/x86_64-suse-linux/lib /usr/lib /data/pro/local/lib /usr/lib64 /usr/local/lib64
+ libs=-lpthread -lgdbm -ldb -ldl -lm -lcrypt -lutil -lc -lgdbm_compat
+ perllibs=-lpthread -ldl -lm -lcrypt -lutil -lc
+ libc=/lib/../lib64/libc.so.6
+ so=so
+ useshrplib=false
+ libperl=libperl.a
+ gnulibc_version='2.37'
+ Dynamic Linking:
+ dlsrc=dl_dlopen.xs
+ dlext=so
+ d_dlsymun=undef
+ ccdlflags='-Wl,-E'
+ cccdlflags='-fPIC'
+ lddlflags='-shared -O0 -g -L/pro/local/lib -fstack-protector-strong'
+
+
+Characteristics of this binary (from libperl):
+ Compile-time options:
+ DEBUGGING
+ HAS_TIMES
+ MULTIPLICITY
+ PERLIO_LAYERS
+ PERL_COPY_ON_WRITE
+ PERL_DONT_CREATE_GVSV
+ PERL_HASH_FUNC_SIPHASH13
+ PERL_HASH_USE_SBOX32
+ PERL_MALLOC_WRAP
+ PERL_OP_PARENT
+ PERL_PRESERVE_IVUV
+ PERL_RC_STACK
+ PERL_TRACK_MEMPOOL
+ PERL_USE_DEVEL
+ PERL_USE_SAFE_PUTENV
+ USE_64_BIT_ALL
+ USE_64_BIT_INT
+ USE_ITHREADS
+ USE_LARGE_FILES
+ USE_LOCALE
+ USE_LOCALE_COLLATE
+ USE_LOCALE_CTYPE
+ USE_LOCALE_NUMERIC
+ USE_LOCALE_TIME
+ USE_LONG_DOUBLE
+ USE_PERLIO
+ USE_PERL_ATOF
+ USE_REENTRANT_API
+ USE_THREAD_SAFE_LOCALE
+ Locally applied patches:
+ uncommitted-changes
+ Built under linux
+ Compiled at Feb 28 2023 18:30:03
+ %ENV:
+ PERL5LIB="/pro/3gl/CPAN/perl-git/lib"
+ PERL6LIB="inst#/pro/3gl/CPAN/rakudo/install"
+ PERL_ARCHLIB="/pro/3gl/CPAN/perl-git"
+ PERL_CORE="1"
+ PERL_INC="/pro/3gl/CPAN/perl-git"
+ PERL_LIB="/pro/3gl/CPAN/perl-git/lib"
+ PERL_SRC="/pro/3gl/CPAN/perl-git"
+ @INC:
+ /pro/3gl/CPAN/perl-git/lib
+ /pro/3gl/CPAN/perl-git/lib
+ /pro/lib/perl5/site_perl/5.37.10/x86_64-linux-thread-multi-ld
+ /pro/lib/perl5/site_perl/5.37.10
+ /pro/lib/perl5/5.37.10/x86_64-linux-thread-multi-ld
+ /pro/lib/perl5/5.37.10