Lines Matching refs:temp_file
766 my $temp_file = shift;
767 $temp_file =~ s/\/{2,}/\//g;
768 my $rc = copy($file, $temp_file);
769 execute_system("$strip $temp_file");
815 local $temp_file = sprintf('%s.%d-%d', $to, $$, time());
818 $rc = strip_target($from, $temp_file);
820 $rc = copy($from, $temp_file);
823 if ( is_newer($temp_file, $from, 0) ) {
824 $rc = utime($$from_stat_ref[9], $$from_stat_ref[9], $temp_file);
826 print_warning("can't update temporary file modification time '$temp_file': $!\n
830 fix_file_permissions($$from_stat_ref[2], $temp_file);
844 $success = rename($temp_file, $to);
874 unlink($temp_file);
1479 if ( defined($temp_file) && -e $temp_file ) {
1480 unlink($temp_file);