summaryrefslogtreecommitdiff
path: root/installperl
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>2000-01-09 22:27:19 +0000
committerGurusamy Sarathy <gsar@cpan.org>2000-01-09 22:27:19 +0000
commit273cf8d1f309172b4416e78e4a8e80c12d941254 (patch)
tree641986755e0e9fcd423ac9000b67cb3688ec8cec /installperl
parent97404f98a6349e3129d8b12b25786316a12e66dc (diff)
downloadperl-273cf8d1f309172b4416e78e4a8e80c12d941254.tar.gz
more changes for new-style version numbers (versions numbers on
the filesystem look like 5.5.640, except on DOS-DJGPP and VMS where they look like 5_5_640; delete @Config{pm_apiversion,xs_apiversion}; split $Config{apiversion} into three, @Config{apirevision,apiversion, apisubversion} for CPP friendliness; $Config{sitelib} now defaults to .../site_perl/$version, just like $Config{privlib}, making sitelib completely independent across versions and substantially eliminating chances of breaking older installations by overwriting newly built extensions; all this means compatibility inclusions for @INC will need to take into account older sitelib versions (this still TODO) windows, vms, dos tweaks for the above p4raw-id: //depot/perl@4773
Diffstat (limited to 'installperl')
-rwxr-xr-xinstallperl18
1 files changed, 9 insertions, 9 deletions
diff --git a/installperl b/installperl
index 1bc5a8e9d2..0ddbf38bfb 100755
--- a/installperl
+++ b/installperl
@@ -40,10 +40,10 @@ my $exe_ext = $Config{exe_ext};
# Allow ``make install PERLNAME=something_besides_perl'':
my $perl = defined($ENV{PERLNAME}) ? $ENV{PERLNAME} : 'perl';
-# This is the base used for versioned names, like "perl5.005".
+# This is the base used for versioned names, like "perl5.6.0".
# It's separate because a common use of $PERLNAME is to install
# perl as "perl5", if that's used as base for versioned files you
-# get "perl55.005".
+# get "perl55.6.0".
my $perl_verbase = defined($ENV{PERLNAME_VERBASE})
? $ENV{PERLNAME_VERBASE}
: $perl;
@@ -91,9 +91,9 @@ find(sub {
}
}, 'ext');
-my $ver = $];
-my $release = substr($ver,0,3); # Not used presently.
-my $patchlevel = substr($ver,3,2);
+my $ver = $Config{version};
+my $release = substr($],0,3); # Not used presently.
+my $patchlevel = substr($],3,2);
die "Patchlevel of perl ($patchlevel)",
"and patchlevel of config.sh ($Config{'PERL_VERSION'}) don't match\n"
if $patchlevel != $Config{'PERL_VERSION'};
@@ -223,7 +223,7 @@ mkpath($installsitearch, 1, 0777) if ($installsitearch);
if (chdir "lib") {
$do_installarchlib = ! samepath($installarchlib, '.');
$do_installprivlib = ! samepath($installprivlib, '.');
- $do_installprivlib = 0 if $versiononly && !($installprivlib =~ m/\Q$]/);
+ $do_installprivlib = 0 if $versiononly && !($installprivlib =~ m/\Q$ver/);
if ($do_installarchlib || $do_installprivlib) {
find(\&installlib, '.');
@@ -238,7 +238,7 @@ else {
mkpath("$installarchlib/CORE", 1, 0777);
my @corefiles;
if ($Is_VMS) { # We did core file selection during build
- my $coredir = "lib/$Config{'arch'}/$]";
+ my $coredir = "lib/$Config{'arch'}/$ver";
$coredir =~ tr/./_/;
@corefiles = <$coredir/*.*>;
}
@@ -370,7 +370,7 @@ if (! $versiononly) {
# ($installprivlib/pods for cygwin).
my $pod = $Is_Cygwin ? 'pods' : 'pod';
-unless ( $versiononly && !($installprivlib =~ m/\Q$]/)) {
+unless ( $versiononly && !($installprivlib =~ m/\Q$ver/)) {
mkpath("${installprivlib}/$pod", 1, 0777);
# If Perl 5.003's perldiag.pod is there, rename it.
@@ -403,7 +403,7 @@ unless ( $versiononly && !($installprivlib =~ m/\Q$]/)) {
# installed perl.
if (!$versiononly) {
- my ($path, @path);
+ my ($path, @path);
my $dirsep = ($Is_OS2 || $Is_W32) ? ';' : ':' ;
($path = $ENV{"PATH"}) =~ s:\\:/:g ;
@path = split(/$dirsep/, $path);