$bufsize = length $buffer; for($chunk_counter = 0; $chunk_counter < $bufsize; $chunk_counter = $chunk_counter + 8){ $eight_byte_chunk = substr($buffer, $chunk_counter ,8); $out_buffer = $out_buffer . $eight_byte_chunk; } syswrite (OUTFILE,$out_buffer, $buffersize);