Lines Matching full:find

13         # This is a hack - at present File::Find does not produce native names
15         # must be set *before* importing File::Find
22 use File::Find;
46 my %Expect_Name = (); # what we expect for $File::Find::name/fullname
47 my %Expect_Dir  = (); # what we expect for $File::Find::dir
88 find({wanted => sub { ++$found if $_ eq 'taint.t' },
149     print "# \$File::Find::dir => '$File::Find::dir'\t\$_ => '$_'\n";
165     $File::Find::prune=1 if  $_ eq 'faba';
169     print "# \$File::Find::dir => '$File::Find::dir'\n";
174 # find/finddepth. Historically topdir() differed on Mac OS classic.
179 # $File::Find::Name (%Expect_Name). Note: When the no_chdir => 1
180 # option is in effect, $_ is the same as $File::Find::Name. In that
243 File::Find::find( {wanted => \&wanted_File_Dir_prune, untaint => 1,
254 eval {File::Find::find( {wanted => \&simple_wanted}, topdir('fa_taint') );};
262 eval {File::Find::find( {wanted => \&simple_wanted, untaint => 1,
274 eval {File::Find::find( {wanted => \&simple_wanted, untaint => 1,
317     File::Find::find( {wanted => \&wanted_File_Dir, follow_fast => 1,
327     eval {File::Find::find( {wanted => \&simple_wanted, follow => 1},
336     eval {File::Find::find( {wanted => \&simple_wanted, follow => 1,
347     eval {File::Find::find( {wanted => \&simple_wanted, untaint => 1,