web commit by http://vibrog.myopenid.com/
[ikiwiki.git] / pm_filter
1 #!/usr/bin/perl -i -p
2
3 BEGIN {
4         $prefix=shift;
5         $ver=shift;
6         $libdir=shift;
7 }
8
9 if (/INSTALLDIR_AUTOREPLACE/) {
10         $_=qq{my \$installdir="$prefix";};
11 }
12 elsif (/VERSION_AUTOREPLACE/) {
13         $_=qq{our \$version="$ver";};
14 }
15 elsif (/^use lib/) {
16         if (grep { $_ eq $libdir } @INC) {
17                 $_="";
18         }
19         else {
20                 $_="use lib '$libdir';\n";
21         }
22 }
23 elsif ($. == 1 && ($ENV{NOTAINT} || ! exists $ENV{NOTAINT}) && m{^(#!/usr/bin/perl) -T$}) {
24         $_=qq{$1\n};
25 }
26 if (/^\$ENV{PATH}="(.*)";/) {
27         $_="\$ENV{PATH}=\"$1:$prefix/bin\";\n";
28 }