Using local::lib dictates the use of PERL5LIB which is disabled when
using a script in -T Taint-mode.
Does anyone have a recommendation on how to use the two together?
I added this code to my scripts, but I am not sure if this is the best solution.
BEGIN {
# sanitize variables to make Taint mode happy
if ($ENV{PERL5LIB}) {
my ($path) = $ENV{PERL5LIB} =~ m{ ([\w/:-]+) }x;
unshift @INC, split /:/, $path;
}
}
regards
Gabor
_______________________________________________
Perl mailing list
[email protected]
http://mail.perl.org.il/mailman/listinfo/perl
