jonnyfolk has asked for the wisdom of the Perl Monks concerning the following question:

#!/usr/bin/perl -w -T use strict; use File::Find; print "Content-type: text/html\n\n"; find( \&print_options, "."); sub print_options { foreach ($_ ) { print "$_\n"; } }

This prints out the files I need but also comes up with the following Software error:

Insecure dependency in chdir while running with -T switch at /usr/loca +l/lib/perl5/5.8.2/File/Find.pm line 723.

If I don't want to delete the -T switch, how do I get round this error?

Thanks

Replies are listed 'Best First'.
Re: Taint switch and File::Find
by Zaxo (Archbishop) on Jun 05, 2006 at 03:18 UTC

    See the File::Find options untaint, untaint_pattern and untaint_skip. The description in perldoc explains all.

    After Compline,
    Zaxo