Unnamed

<?php/* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~  This is a fix if register_globals is turned off ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ */if(!$PHP_SELF){	if($HTTP_POST_VARS) 	{extract($HTTP_POST_VARS, EXTR_PREFIX_SAME, "post_");}	if($HTTP_GET_VARS)  	{extract($HTTP_GET_VARS, EXTR_PREFIX_SAME, "get_");}	if($HTTP_COOKIE_VARS)	{extract($HTTP_COOKIE_VARS, EXTR_PREFIX_SAME, "cookie_");}	if($HTTP_ENV_VARS)	 	{extract($HTTP_ENV_VARS, EXTR_PREFIX_SAME, "env_");}}if($PHP_SELF == ""){ $PHP_SELF = $HTTP_SERVER_VARS[PHP_SELF]; }?><FORM method="post" action='?envios=si'>Destinatario: <INPUT type="text" name="para"><br>Tema <INPUT type="text" name="tema"><br>Nombre de autor: <INPUT type="text" name="autor"><br>email autor: <INPUT type="text" name="amail"><br> mensaje : <textarea rows='13' name='mensaje' cols='44'></textarea><br><INPUT type="submit" name="envio" value="Enviar"><br></FORM> <?PHPif ($envios=='si'){$cabecera .= "From: ".$autor."<" .$amail.">\nReply-To:".$amail."\nX-Mailer: MS Outlook\nReturn-Path: ".$amail;if (@mail ($para, $tema, $mensaje, $cabecera)){echo "Enviado<br>";}else{echo "Error<br>";}}?>