Tip: comprobar e-mail

[zeus_bsas]

He pasado un tiempo buscando algun script que validara direcciones de e-mail pero nunca encontre uno que controle absolutamente todo. Por eso fabrique el que les presento a continuacion, y lo presento aca por si a alguno de ustedes les pasaba lo mismo.
ACLARACION: tiene muchas partes sin simplificar, ya lo se, pero esta hecho y explicado de esa forma para que cualquiera pueda entenderlo sin ponerse a pensar que fue lo que quise hacer, por ejemplo llaves, comprobaciones, etc.

Primera Parte:

function validar_mail ()
{

var error = "no";

//el mail ingresado es
mail = document.formregistro.mail.value;

//los caracteres posibles son:
caracteres = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQR STUVWXYZ0123456789-_.@";

//la posicion de la arroba sera
var posicion_arroba = 0;

//la cantidad de arrobas sera
var cant_arrobas = 0;

//la posicion del ultimo punto sera
var posicion_punto = 0;

//la cantidad de puntos sera
var cant_puntos = 0;

//cuento la cantidad de arrobas y puntos y guardo
//las posiciones de los ultimos de c/u
for (var i=0; i<mail.length; i++)
{
if (mail.charAt(i) == "@")
{
posicion_arroba = i;
cant_arrobas = cant_arrobas + 1;
}
if (mail.charAt(i) == ".")
{
posicion_punto = i;
cant_puntos = cant_puntos + 1;
}

//voy a cerciorarme de que la cadena mail no contiene
//ningun caracter extraño
//si lo contiene entonces error = "si"

if (caracteres.indexOf(mail.charAt(i))<0)
{
error = "si";
}

}

//si encuentro luego de la arroba .. entonces:

if (mail.indexOf('..',posicion_arroba)>=0)
{
error = "si";
}