Deal with different paths to perl when removing -T flag.

[ikiwiki.git] / pm_filter

diff --git a/pm_filter b/pm_filter
index a66cf215470f330f7bf9fb7c7b1a808472fea206..6c745e1f8c007e5a2a0d38c46c367b27cfa1aeed 100755 (executable)
--- a/pm_filter
+++ b/pm_filter
@@ -20,7 +20,7 @@ elsif (/^use lib/) {
                $_="use lib '$libdir';\n";
        }
 }
                $_="use lib '$libdir';\n";
        }
 }

-elsif ($. == 1 && ($ENV{NOTAINT} || ! exists $ENV{NOTAINT}) && m{^(#!/usr/bin/perl) -T$}) {
+elsif ($. == 1 && ($ENV{NOTAINT} || ! exists $ENV{NOTAINT}) && m{^(#!.*perl.*?) -T$}) {

        $_=qq{$1\n};
 }
 if (/^\$ENV{PATH}="(.*)";/) {
        $_=qq{$1\n};
 }
 if (/^\$ENV{PATH}="(.*)";/) {