function WriteToFile ($path_to_file,$data) {
        $lock = fopen("path_to_file","a");
        if(flock($lock, LOCK_EX)) {
            $tmp=fop
en("tmp.txt","w");
            for(
$i=0;$i<count ($data);$i++) {
             &n
bsp;  fputs($tmp, "$data[$i]\n");
            }
            fclose&#
40;$tmp);
            unlink&#
40;"$path_to_file");
            
            rename&#
40;"tmp.txt", "$path_to_file");
            flock
0;$lock, LOCK_UN);
            fclose&#
40;$lock);
            unlink&#
40;"path_to_file");
        }
    }