fputs перезаписывает первую строку csv

Question

Вот мой код, который пишет в CSV. Моя проблема в том, что он перезаписывает верхнюю строку моего CSV-файла. Есть ли способ сделать это по-другому? Я хочу добавить новые данные в начало CSV, не перезаписывая ничего, что уже есть.

    // Send Routine 
    $filename="contact.csv";
    $datfile=fopen($filename, 'r+');
            spamcheck($EReply);     
            $ESubject=$Subject;

//          $EMessage = $MsgHeader;
            $EMessage = "Form Submission:\r\n";
            for(reset($FormField); $key=key($FormField); next($FormField)) {
                spamcheck($FormField[$key]);
                $EMessage .= $key.": ".$FormField[$key];
//              $EMessage .= "<br><br>\r\n";
                $EMessage .= "\r\n";
                $datachunk="\"".$FormField[$key]."\",";
                fputs($datfile, $datachunk);
            }
    fputs($datfile, "\r\n");
    fclose($datfile);