cvsdist 3c741a1
#!/bin/perl
cvsdist 3c741a1
#
cvsdist ebc800e
# install script for man-pages-ja-0.5-20011115
cvsdist ebc800e
#
cvsdist ebc800e
# Will never work on other man pages!!
cvsdist ebc800e
#
cvsdist ebc800e
# By Yukihiro Nakai <ynakai@redhat.com>
cvsdist 3c741a1
cvsdist 3c741a1
print "$ARGV[0]/usr/share/man/ja\n";
cvsdist 3c741a1
print "1\n";
cvsdist 3c741a1
print "root\n";
cvsdist 3c741a1
print "root\n";
cvsdist 3c741a1
print "C\n";
cvsdist 3c741a1
cvsdist ebc800e
###
cvsdist ebc800e
# Maintainer should update these number according to the original Makefile
cvsdist ebc800e
###
d5470a6
my $n=`grep -v -E "^#.*" $ARGV[1] | wc -l`;
d5470a6
for($i=0; $i<=$n; $i++) {
cvsdist 3c741a1
  print "\n";
cvsdist 3c741a1
}
cvsdist 3c741a1
print "C\n";
cvsdist 3c741a1
Akira TAGOH 4cf0dc3
for($i=0; $i<=145; $i++) {
cvsdist 3c741a1
  print "0\n";
cvsdist 3c741a1
}
cvsdist 3c741a1
print "C\n";