Have configdata.pm display information on perl

Specifically, the specific perl that was used to run Configure

Reviewed-by: Rich Salz <rsalz@openssl.org>
(Merged from https://github.com/openssl/openssl/pull/5247)
This commit is contained in:
Richard Levitte 2018-02-02 12:21:27 +01:00
parent 60595292ae
commit d5fa7035cb

View file

@ -278,6 +278,11 @@ if (defined env($local_config_envname)) {
} }
} }
# Save away perl command information
$config{perl_cmd} = $^X;
$config{perl_version} = $Config{version};
$config{perl_archname} = $Config{archname};
$config{prefix}=""; $config{prefix}="";
$config{openssldir}=""; $config{openssldir}="";
$config{processor}=""; $config{processor}="";
@ -2373,12 +2378,14 @@ _____
-verbose => 2); -verbose => 2);
} }
if ($dump || $cmdline) { if ($dump || $cmdline) {
print "\n(with current working directory = $here)"; print "\nCommand line (with current working directory = $here):\n\n";
print "\nCommand line:\n\n";
print ' ',join(' ', print ' ',join(' ',
$config{perl}, $config{perl},
catfile($config{sourcedir}, 'Configure'), catfile($config{sourcedir}, 'Configure'),
@{$config{perlargv}}), "\n"; @{$config{perlargv}}), "\n";
print "\nPerl information:\n\n";
print ' ',$config{perl_cmd},"\n";
print ' ',$config{perl_version},' for ',$config{perl_archname},"\n";
} }
if ($dump || $options) { if ($dump || $options) {
my $longest = 0; my $longest = 0;