This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Don't install unnecessary unicore files
authorDavid Golden <dagolden@cpan.org>
Wed, 17 Nov 2010 20:03:18 +0000 (15:03 -0500)
committerDavid Golden <dagolden@cpan.org>
Thu, 18 Nov 2010 02:12:06 +0000 (21:12 -0500)
Many of the files in lib/unicore are no longer needed
after testing.  This patches installperl to skip those
files, cutting down the installed size of unicore
from about 17M to about 7M.

installperl

index c6d358b..d1eafe6 100755 (executable)
@@ -716,6 +716,19 @@ sub installlib {
     return if $name =~ m{\b(?:APItest|Typemap)\.pm$};
     # ignore the demo files
     return if $dir =~ /\b(?:demos?|eg)\b/;
+    # ignore unneeded unicore files
+    if ( $dir =~ /^unicore/ ) {
+      if ( $name =~ /\.txt\z/ ) {
+        # We can ignore most, but not all .txt files
+        return unless $name =~ /\A(?:UnicodeData|Blocks|Scripts|CompositionExclusions|CaseFolding|SpecialCasing|NamedSequences)\.txt\z/;
+      }
+      else {
+        # TestProp only needed during testing
+        return if $name =~ /\ATestProp.pl\z/;
+        # we need version and *.pl files and can skip the rest
+        return unless $name =~ /\A(?:version|\w+\.pl)\z/;
+      }
+    }
 
     # ignore READMEs, MANIFESTs, INSTALL docs, META.ymls and change logs.
     # Changes.e2x and README.e2x are needed by enc2xs.