Lines Matching refs:FILE
3 use File::Find;
4 use File::Copy;
22 my $file = $_;
23 my $dir = $File::Find::dir;
24 # Record if a CMake file was found.
25 if ($file eq "CMakeLists.txt") {
26 $dirCMake{$dir} = $File::Find::name;
29 # Grab the extension of the file.
30 $file =~ /\.([^.]+)$/;
38 push @$files, $file;
53 foreach my $file (sort @$files) {
55 print OUT $file;
87 open(FILE, $cmakeList) or
89 binmode FILE;
90 my $digestA = Digest::MD5->new->addfile(*FILE)->hexdigest;
91 close(FILE);
93 open(FILE, $cmakeListNew) or
95 binmode FILE;
96 my $digestB = Digest::MD5->new->addfile(*FILE)->hexdigest;
97 close(FILE);
