Lines Matching refs:FILE
191 open(FILE, qq(diff -d --old-group-format="$old" --new-group-format="$new" --changed-group-format="$changed" --unchanged-group-format="$unchanged" $file1 $file2 |)) || die("Diff failed: $!");
215 while (<FILE>) {
285 close FILE;
358 open(FILE, $filename) || die("File $filename cannot be opened: $!");
359 while (<FILE>) {
442 close FILE;
460 open (FILE, ">$tmp1");
461 print FILE $tmp;
462 close FILE;
465 open (FILE, ">$tmp2");
466 print FILE $tmp;
467 close FILE;
472 open(FILE, $headertmp2);
473 while (<FILE>) {
476 close(FILE);
482 open(FILE, ">$file3");
483 print FILE $output;
484 close FILE;
526 open (FILE, ">$tmp1");
527 print FILE $split1;
528 close FILE;
531 open (FILE, ">$tmp2");
532 print FILE $split2;
533 close FILE;
538 open(FILE, $headertmp2);
539 while (<FILE>) {
542 close(FILE);