$cadena = str_replace ("\[EMAIL=", "<A HREF=mailto:", $cadena); $cadena = str_replace ("\[/EMAIL\]", "</A>", $cadena);