Enviar mail con adjunto en php

[chemon]

Saludos a todos
Estoy tratando de enviar un email con contenido adjunto
Después de varios quebraderos de cabeza encontré entre mis apuntes un código que me permitia enviarlo.
El problema es que me envía el archivo adjunto pero no consigo que muestre el texto del mensaje.
Ya he comprobado que el texto del mensaje si que se carga bien en el código. Y no puedo utilizar una de las librerias que permiten gestionar el envío de correos ya que mi cliente trabaja con PHP4.2 y no he conseguido hacer funcionar ninguna de las que he probado

Os adjunto el código por si alguien ve algo que a mi se me pasa

Código PHP:

$mi_fichero = $_FILES['fichero']['tmp_name'];
            $tamanio_fichero = filesize($mi_fichero);
            $puntero = fopen($mi_fichero, "r");
            $contenido = fread($puntero, $tamanio_fichero);
            fclose($puntero);
            
            $contenido_codificado = chunk_split(base64_encode($contenido));
            
            $cabecera = "From: [email protected]\n";
            //$cabecera .= "Reply-To: [email protected]\n";
            $cabecera .= "MIME-version: 1.0\n";
            $cabecera .= "Content-type: multipart/mixed; boundary=\"Mi-Separador\"\n";
            $cabecera .= "Content-transfer-encodign: 7BIT";
            
            $separador_inicial="--Mi-Separador";
            $cabecera_mensaje = "Content-type: text/plain; charset=US-ASCII\n";
            $cabecera_mensaje .= "Content-transfer-encoding: 7BIT \n\n";
            
            $separador = "\n\n--Mi-Separador\n";
            $cabecera_anexo = "Content-type:".$_FILES['fichero']['type']."; name=\"".$_FILES['fichero']['name']."\"\n";
            $cabecera_anexo .= "Content-Transfer-Encoding: BASE64\n";
            $cabecera_anexo .= "Content-disposition: attachment; filename=\"".$_FILES['fichero']['name']."\"\n\n";
            
            $cuerpo = $separador_inicial;
            $cuerpo .= $cabecera_mensaje;
            $cuerpo .= "AQui texto del mensaje:<br>".$texto."<br />FIN msg";
            $cuerpo .= $separador;
            $cuerpo .= $cabecera_anexo;
            $cuerpo .= $contenido_codificado;
            $cuerpo .= "\n".$separador_inicial."--\n";
 

Muchas gracias por adelantado