Lines Matching refs:allfiles
997 local (@allfiles);
1000 @allfiles = grep (!/^(\.\.?|CVS|RCS)$/, readdir (DIR) );
1004 print "dirtree: (%dirtree)\n$basedir: (@allfiles)\n";
1015 foreach $i (0 .. $#allfiles)
1017 if ($allfiles[$i] eq $path)
1019 splice (@allfiles, $i, 1); # delete it
1022 print " Zapped $path; files now (@allfiles).\n";
1044 push (@allfiles, @files);
1109 print "leftovers: (@allfiles).\n";
1112 foreach $file (@allfiles)