This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Patch installperl to be long double-aware.
[perl5.git] / installperl
index eb2a31e..b50c745 100755 (executable)
@@ -113,9 +113,10 @@ find(sub {
 
 # print "[$_]\n" for sort keys %archpms;
 
+my $perlver = sprintf "%8.6f",$];
 my $ver = $Config{version};
-my $release = substr($],0,3);   # Not used presently.
-my $patchlevel = substr($],3,2);
+my $release = substr($perlver,0,3);   # Not used presently.
+my $patchlevel = substr($perlver,3,2);
 die "Patchlevel of perl ($patchlevel)",
     "and patchlevel of config.sh ($Config{'PERL_VERSION'}) don't match\n"
        if $patchlevel != $Config{'PERL_VERSION'};