open (OUTFILE, ">>$file_path");

  binmode(OUTFILE);
  
  while($bytesread=read($file_name, $buffer, 1024)) 
  {
    print OUTFILE $buffer;
  }