Select Code to Download

# reading file into array and then process it 
# and write out to the same file:
...
        print LOG $line;
    }
    close LOG;

# trying to optimize performance and memory usage 
# by replacing foreach() with while()
...
    close TMP;
    rename($tempfile,"$file");
    close LOG;