Magellan Linux

Annotation of /mage/trunk/include/perl.minc

Parent Directory Parent Directory | Revision Log Revision Log


Revision 2 - (hide annotations) (download)
Sat Jan 2 16:48:22 2010 UTC (14 years, 3 months ago) by niro
File size: 1472 byte(s)
-initial mage profiles and includes
1 niro 2 # $Header: /alx-cvs/mage-eglibc/include/perl.minc,v 1.1 2008/06/07 18:42:38 niro Exp $
2    
3     perlinfo()
4     {
5     if [ -f /usr/bin/perl ]
6     then
7     POD_DIR="/usr/share/perl/magellan-pods/${version}"
8     fi
9    
10     eval $(perl '-V:version')
11     PERL_VERSION=${version}
12    
13     eval $(perl '-V:installsitearch')
14     SITE_ARCH=${installsitearch}
15    
16     eval $(perl '-V:installarchlib')
17     ARCH_LIB=${installarchlib}
18    
19     eval $(perl '-V:installsitearch')
20     SITE_LIB=${installsitearch}
21    
22     local installvendorlib
23     eval $(perl '-V:installvendorlib')
24     VENDOR_LIB=${installvendorlib}
25    
26     local installvendorarch
27     eval $(perl '-V:installvendorarch')
28     VENDOR_ARCH=${installvendorarch}
29    
30     # handling of DESTDIR changed in makemaker 6.11
31     MMSIXELEVEN=$(perl -e 'use ExtUtils::MakeMaker; print( $ExtUtils::MakeMaker::VERSION ge "6.11" )')
32     }
33    
34     # taken from gentoo eclass perl-module.eclass
35     updatepod()
36     {
37     local i
38    
39     perlinfo
40    
41     if [ -d "${POD_DIR}" ]
42     then
43     for i in $(find ${POD_DIR} -type f -name "*.pod.arch")
44     do
45     cat ${i} >> ${ARCH_LIB}/perllocal.pod
46     rm -f ${i}
47     done
48     for i in $(find ${POD_DIR} -type f -name "*.pod.site")
49     do
50     cat ${i} >> ${SITE_LIB}/perllocal.pod
51     rm -f ${i}
52     done
53     for i in $(find ${POD_DIR} -type f -name "*.pod.vendor")
54     do
55     cat ${i} >> ${VENDOR_LIB}/perllocal.pod
56     rm -f ${i}
57     done
58     fi
59     }
60    
61     perl_preinstall()
62     {
63     perlinfo
64     }
65    
66     perl_postinstall()
67     {
68     updatepod
69     }
70    
71     perl_preremove()
72     {
73     updatepod
74     }
75    
76     perl_postremove()
77     {
78     updatepod
79     }
80    
81     export_inherits perl preinstall postinstall preremove postremove