ikiwiki/pm_filter

34 lines
767 B
Plaintext
Raw Normal View History

#!/usr/bin/perl -i -p
BEGIN {
$prefix=shift;
$ver=shift;
$libdir=shift;
}
if (/INSTALLDIR_AUTOREPLACE/) {
$_=qq{our \$installdir="$prefix";};
}
elsif (/VERSION_AUTOREPLACE/) {
$_=qq{our \$version="$ver";};
}
elsif (/^(?:use FindBin; *)?use lib/) {
# The idea here is to figure out if the libdir the Makefile.PL
2009-02-04 19:45:54 +01:00
# was configured to use is in perl's normal search path.
# If not, hard code it into ikiwiki.
if ((grep { $_ eq $libdir } @INC) &&
(! exists $ENV{PERL5LIB} || ! length $ENV{PERL5LIB} ||
$ENV{PERL5LIB} ne $libdir)) {
$_="";
}
else {
$_="use lib '$libdir';\n";
}
}
elsif ($. == 1 && ($ENV{NOTAINT}=0) && m{^(#!.*perl.*?)$}) {
$_=qq{$1 -T\n};
}
elsif (/^\$ENV\{PATH}="(.*)";/) {
$_="\$ENV{PATH}=\"$1:$prefix/bin\";\n";
}