Lines Matching refs:files
77 my @files = ();
430 my @files = readdir(DIR);
432 foreach my $file (@files) {
563 push(@files, $file);
576 my $file_cnt = @files;
593 push(@files, $filename);
596 push(@files, $filename);
600 push(@files, $filename1);
601 push(@files, $filename2);
609 push(@files, $filename);
625 if ($file_cnt == @files) {
629 @files = sort_and_uniq(@files);
887 foreach my $file (@files) {
983 foreach my $file (@files) {