diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 1998-07-15 04:45:57 +0300 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-07-15 06:26:00 +0000 |
| commit | 3f5ee3026104a5258c13c354d1b62b7b5e80170d (patch) | |
| tree | 399dd69c836f227cf17189ba8175e0719f987f37 /installperl | |
| parent | 93502d792e3945f395126f4570c980edbfee0f5e (diff) | |
| download | perl-3f5ee3026104a5258c13c354d1b62b7b5e80170d.tar.gz | |
5.004_74: MPE/iX final touches
Message-Id: <199807142245.BAA09651@alpha.hut.fi>
p4raw-id: //depot/perl@1502
Diffstat (limited to 'installperl')
| -rwxr-xr-x | installperl | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/installperl b/installperl index d462333fd2..2db72d41ae 100755 --- a/installperl +++ b/installperl @@ -159,11 +159,6 @@ if ($Is_VMS) { copy("perlshr$exe_ext", "$installbin/${perl}shr$exe_ext"); chmod(0755, "$installbin/${perl}shr$exe_ext"); } -elsif ($^O ne 'dos') { - safe_unlink("$installbin/$perl$ver$exe_ext"); - copy("perl$exe_ext", "$installbin/$perl$ver$exe_ext"); - chmod(0755, "$installbin/$perl$ver$exe_ext"); -} elsif ($^O eq 'mpeix') { # MPE lacks hard links and requires that executables with special # capabilities reside in the MPE namespace. @@ -174,6 +169,11 @@ elsif ($^O eq 'mpeix') { # Create a backup copy with the version number. link($Config{perlpath}, "$installbin/perl$ver$exe_ext"); } +elsif ($^O ne 'dos') { + safe_unlink("$installbin/$perl$ver$exe_ext"); + copy("perl$exe_ext", "$installbin/$perl$ver$exe_ext"); + chmod(0755, "$installbin/$perl$ver$exe_ext"); +} else { safe_unlink("$installbin/$perl.exe"); copy("perl.exe", "$installbin/$perl.exe"); |