Lines Matching refs:path
19 for my $path ( @files ){20 cacheout $path;21 print $path "$path 1\n";25 for my $path ( @files ){26 ok(fileno($path) || $path =~ /^(?:foo|bar)$/);27 next unless fileno($path);28 print $path "$path 2\n";29 close($path);30 open($path, $path);31 <$path>;32 push @cat, <$path>;33 close($path);