Lines Matching refs:File

54 use File::Spec;
55 use File::Find;
152             push(@search, grep($_ ne File::Spec->curdir, @new_INC));
154             push(@search, grep($_ ne File::Spec->curdir, @INC));
187         unless(File::Spec->file_name_is_absolute($try)) {
189             $try = File::Spec->catfile($pwd,$try);
194         $try = File::Spec->canonpath($try) if ($^O ne 'VMS');
204         File::Find::find( sub {
205             my $item = $File::Find::name;
208                     $File::Find::prune = 1;
214                     $File::Find::prune = 1;
221                     $File::Find::prune = 1;
369          '-dirs' => [ File::Spec->curdir ],
438       my $fullname = File::Spec->catfile($dir, @parts);
462     if((File::Spec->case_tolerant || $^O =~ /macos|darwin|cygwin/i)
463      && -d File::Spec->catdir($dir,'pods')) {
464       $dir = File::Spec->catdir($dir,'pods');
467     if(-d File::Spec->catdir($dir,'pod')) {
468       $dir = File::Spec->catdir($dir,'pod');