On Wed, Aug 28, 2002 at 11:26:09AM +0100, Jason Timmins wrote:
>> $path = $file;
>> $path =~ /^(.+)$/s or die "invalid filename: $path";
>> $path =~ s[:][]g if $^O eq 'MSWin32';
>> $compiled = "$compdir$path$compext";
>> $compiled =~ s[//][/]g;
>> + $compiled = $1 if /(.*)/; # taint cleaning
> With this new line inserted it no-longer bitches about insecure dependency,
> but instead I get an error about an uninitialized value....
The problem is that the regex is matching on $_ instead of $compiled.
Try this instead:
$compiled = $1 if $compiled =~ /(.*)/; # taint ignoring
>> return $compiled;
>> }
--
Trond Michelsen
_______________________________________________
templates mailing list
[EMAIL PROTECTED]
http://www.template-toolkit.org/mailman/listinfo/templates
