Lines Matching refs:FILE
28 use File::Basename;
39 Usage: $programName --shell=[path] [options] FILE FILE
70 open FILE, "<", $filename or die;
75 while (<FILE>) {
99 close FILE;
110 open FILE, ">", $path or die;
111 print FILE $contents;
112 close FILE;
118 open FILE, "<", $path or die;
119 my $result = <FILE>;
120 close FILE;
131 for my $file (readdir DIR) {
132 if ($file =~ $pattern) {
133 my $age = -M "$dir/$file";
135 $newestFile = $file;
