Email com anexo

Pessoal não to conseguindo enviar o email com anexo...

O email é enviado porem o anexo não vem junto...

Form_envio.html

<br>
<br>
 <TR>
<TD>Assunto....: </TD>
<TD><input type="text" name="bcc" size=40><BR></TD>
</TR>
<br>
<TR>
<TD>Mensagem: </TD>
<TD><TEXTAREA NAME="body" ROWS="10" COLS="50"></TEXTAREA></TD>
</TR>
<br>
<br>
<TR>
<TD>Arquivo.....: </TD>
<td><input name="arquivo" type="file"></td>
</TR>
<br>
<br>

Envio_mail.php

<?php
if(isset($_POST["email"])) {
 foreach($_POST["email"] as $banco => $VALOR) { $$banco = $VALOR; $EMAIL .= $VALOR .',';}
 //foreach($_POST["email"] as $email)
 $mail_destino = $EMAIL;
}
 // $EMAIL = "";

// foreach($_POST["email"] as $banco => $VALOR) { $$banco = $VALOR; $EMAIL .= $VALOR;}
 /* solução enviada pelo forum...
 foreach($_POST["email"] as $VALOR)
 $EMAIL .= $VALOR. ','; */
// echo "$EMAIL";

	echo "Nenhum email selecionado!";

}

//pego os dados enviados pelo formulario

$email = $mail_destino;
$mensagem = "teste";
$assunto	= "Testes";
$email_from = "testes@gmail.com";

//formato o campo da mensagem
$mensagem = wordwrap( $mensagem, 50, "

", 1);

$arquivo = isset($_FILES["arquivo"]) ? $_FILES["arquivo"] : FALSE;

if(file_exists($arquivo["tmp_name"]) and !empty($arquivo)){

 $fp = fopen($_FILES["arquivo"]["tmp_name"],"rb");
 $anexo = fread($fp,filesize($_FILES["arquivo"]["tmp_name"]));
 $anexo = base64_encode($anexo);

fclose($fp);

$anexo = chunk_split($anexo);

$boundary = "XYZ-" . date("dmYis") . "-ZYX";

	$mens = "--$boundary\n";
	$mens .= "Content-Transfer-Encoding: 8bits\n";
	$mens .= "Content-Type: text/html; charset=\"ISO-8859-1\"\n\n"; //plain
	$mens .= "$mensagem\n";
	$mens .= "--$boundary\n";
 $mens .= "Content-Type: ".$arquivo["type"]."\n";
 $mens .= "Content-Disposition: attachment; filename=\"".$arquivo["name"]."\"\n";
 $mens .= "Content-Transfer-Encoding: base64\n\n";
 $mens .= "$anexo\n";
 $mens .= "--$boundary--\r\n";

$headers = "MIME-Version: 1.0\n";
$headers .= "From: \"TESTE\" <$email_from>\r\n";
$headers .= "Content-type: multipart/mixed; boundary=\"$boundary\"\r\n";
$headers .= "$boundary\n";

//envio o email com o anexo

mail($email,$assunto,$mens,$headers);

 echo"Email enviado com Sucesso!";

}

Alguém tem alguma ideia???