diff options
author | Karl Berry <karl@freefriends.org> | 2005-12-27 23:56:17 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2005-12-27 23:56:17 +0000 |
commit | 577983747d8680b8defbfdd03a9d50bad6fd54b7 (patch) | |
tree | 16b160f53c6c4c309c07db2c5b095d3abb16f69a /Build/cdbuild/summary.pl | |
parent | 07fed0169bae91dfb5616f9d19e7969727e19d4d (diff) |
initial Build
git-svn-id: svn://tug.org/texlive/trunk@4 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/cdbuild/summary.pl')
-rw-r--r-- | Build/cdbuild/summary.pl | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/Build/cdbuild/summary.pl b/Build/cdbuild/summary.pl new file mode 100644 index 00000000000..d5b2a9684a8 --- /dev/null +++ b/Build/cdbuild/summary.pl @@ -0,0 +1,10 @@ +#/texlive/texmf-dist/lists/fonts1/fontmisc : 419840 +while (<>) { + chop; + ($bundle,$size) = /.*lists.([^\/]*)\/.*: (.*).../; + $Sizes{$bundle} = $Sizes{$bundle} + $size; +} +foreach $i (keys %Sizes) { + $S=$Sizes{$i}/1000; + print "p_",$i,"_du=\'$S\'\n"; +} |