my $percent_complete = stat(temp_file_name)[7];