--- Camilo Gonzalez <[EMAIL PROTECTED]> wrote:
> Dudes,
> 
> Someone has to have some inkling how to open filehandles for writing whilst
> running in taint mode (-T). C'mon there are some of the best Perl minds in
> the world here. Is it impossible?
[snip]
> but kept getting this error, "Insecure dependency in open while running with
> -T switch at /u/web/lega63/cgi-local/SecureMail.pl line 455". HELP! I don't
> want to run this program without taint checks.
>             
>         #The next line is line 455
>         open (COUNTER,">$mailPrefix[0]Counter.txt")...

Hi Camilo,

Earlier in the program, you were allowed to open the filehandle for reading because 
Perl doesn't
think that *reading* is a security hole.  However, *writing* is a different matter.  
In the above
snippet, Perl says that $mailPrefix[0] is tainted and the open is unsafe, so it kills 
your script.

Untaint $mailPrefix[0] and your problem should be solved.

Cheers,
Curtis "Ovid" Poe

=====
"Ovid" on http://www.perlmonks.org/
Someone asked me how to count to 10 in Perl:
push@A,$_ for reverse q.e...q.n.;for(@A){$_=unpack(q|c|,$_);@a=split//;
shift@a;shift@a if $a[$[]eq$[;$_=join q||,@a};print $_,$/for reverse @A

__________________________________________________
Do You Yahoo!?
LAUNCH - Your Yahoo! Music Experience
http://launch.yahoo.com

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to