5.8.4/distrib/installperl

12 #    * SCCS directories and .tstamp files ignored on install
18     chdir '..' if !-d 'lib' and -d '../lib';
110   +v        Install perl as "perl" and as a binary with the version number in
204     "and patchlevel of config.sh ($Config{'PERL_VERSION'}) don't match\n"
217 # Shared library and dynamic loading suffixes.
278 if (($Is_W32 and ! $Is_NetWare) or $Is_Cygwin) {
287 	    # install ld2 and perlld as well
328 } # if (($Is_W32 and ! $Is_NetWare) or $Is_Cygwin)
355     # MPE lacks hard links and requires that executables with special
421 # Install header files and libraries.
456 # Switch in the 5.005-threads versions of he threadsafe queue and semaphore
522 	# to binexp/perl if binexp and installbin are different.
732 	( CORE::unlink($name) and ++$cnt
757     if (-f $to and not unlink($to)) {
791 		 if $Is_VMS and -e $to and !$silent;
792 	unless ($nonono or File::Copy::copy($from, $to) and ++$success) {
795 		unless -f $to and (chmod(0666, $to), unlink $to)
796 			and File::Copy::copy($from, $to) and ++$success;
819     print "  creating new version of $xto\n" if $Is_VMS and -e $to and !$silent;
823 	    unless -f $to and (chmod(0666, $to), unlink $to)
824 		   and File::Copy::copy($from, $to);
852     # Ignore version control directories and ON artifacts.
853     if (($name =~ /^(?:CVS|RCS|SCCS|\.svn)\z/ and -d $name)
854         or ($name eq '.tstamp' and -f $name)) {
859     # ignore patch backups, RCS files, emacs backup & temp files and the
860     # .exists files, .PL files, and test files.
867     # ignore the cpan script in lib/CPAN/bin, the instmodsh and xsubpp
868     # scripts in lib/ExtUtils, and the prove script in lib/Test/Harness
893 	    #We're installing *.al and *.ix files into $installprivlib,
894 	    #but we have to delete old *.al and *.ix files from the 5.000
908 		# Don't copy .nlp,.nlm files, doesn't make sense on Windows and also
910 		# Has to be copied if we are installing on a NetWare server and hence
914 			and chmod($name =~ /\.(so|$dlext)$/o ? 0555 : 0444,
924 			    if ($name =~ /\.a$/o and $^O =~ /^(rhapsody|darwin)$/);
938 # and then try to link against the installed libperl.a, you might
953 	# multiple symlinks (when going over NFS?) and fail to read
956 	# and you end up with those pods not getting installed.