Retirar virgula do ultimo registro com foreach

[uoquisala 0]

Boa noite fiz esse código para pegar algumas informações escolhidas de dentro de um xml de Nfe e gravo em formato json. Mais no último foreach onde pego os itens preciso eliminar a vírgula do ultimo registro, ja tentei várias maneiras e não consegui!

 

<?php
function gravar($texto){
    $arquivo = "final.json";
    $fp = fopen($arquivo, "a+");
    fwrite($fp, $texto);
    fclose($fp);
}
$xml = simplexml_load_file('1nfe.xml') or die("Não consegui abrir o XML"); 

foreach($xml->NFe as $NFe)
{
    foreach($xml->NFe->infNFe as $infNFe)
    {
        foreach($xml->NFe->infNFe->ide as $ide)
        {
            $numeroNF = $ide->nNF;
            $serie = $ide->serie;
		 
			foreach($xml->NFe->infNFe->dest as $dest)
            {
				$CNPJ = $dest->CNPJ;
                $xNome = $dest->xNome;
			
                foreach($xml->NFe->infNFe->dest->enderDest as $enderDest)
                {
                    $xLgr = $enderDest->xLgr;
                    $xNro = $enderDest->nro;
                    $xBairro = $enderDest->xBairro;
                    $xMun = $enderDest->xMun;
                    
gravar("{\"Nota\":{\"$numeroNF\":{\"Entrega\":{\"Nº Nota\":$numeroNF,\"Serie\":$serie,\"CNPJ\":\"$CNPJ\",\"Cliente\":\"$xNome\",\"Endereço\":\"$xLgr\",\"Nº\":$xNro,\"Bairro\":\"$xBairro\",\"Município\":\"$xMun\"}, ");
gravar("\"itens\":{");
					
					foreach($xml->NFe->infNFe->det as $det){
					$cProd = $det->prod->cProd;
                    $xProd = $det->prod->xProd;
                    $uCom = $det->prod->uCom;
                    $qCom = $det->prod->qCom;
gravar("\"$cProd\" : {");
gravar("\"Descricao\":\"$xProd\",\"Tipo\":\"$uCom\",\"Quantidade\":$qCom}, "); // Eliminar essa ultima virgula, mais so do ultimo registro!.
					       
				   }
					 
                }
            }
			
        }
    }
}

gravar("},");
gravar("\"motorista\":\"Marcelo guedes\"}}} ");
?>

 

[Guilherme Luiz 41]

str_replate
preg_replace

 

já tentou com essas funções?

[uoquisala 0]

9 minutos atrás, Guilherme Luiz disse:

str_replate
preg_replace

 

já tentou com essas funções?

 

Não consegui fazer já que a informação e logo gravada no arquivo !, pq teria que retirar so da ultima linha, o maximo que cnsegui foi tirar de todas!