diff options
author | David Golden <dagolden@cpan.org> | 2010-11-17 15:03:18 -0500 |
---|---|---|
committer | David Golden <dagolden@cpan.org> | 2010-11-17 21:12:06 -0500 |
commit | e4ed29fbb903ac6b15b0ec4a5a6696aaa73401f2 (patch) | |
tree | 9f9da70128b2bfd443f5b3313f00fe3a913cae8a /installperl | |
parent | aa2f79cfd781fa0bd9e0fcec607dd31150743daa (diff) | |
download | perl-e4ed29fbb903ac6b15b0ec4a5a6696aaa73401f2.tar.gz |
Don't install unnecessary unicore files
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.
Diffstat (limited to 'installperl')
-rwxr-xr-x | installperl | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/installperl b/installperl index c6d358be37..d1eafe6d60 100755 --- a/installperl +++ b/installperl @@ -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. |