function verifEmail(mail) {
	var ret = true;
	var car = "";
	var carAfter = "";
	var carBefore = "";
	var nbrcar = mail.length;
	var nbrarobase = 0;
	var nbrpoint = 0;
	var goodcar = "@0123456789.-_abcdefghijklmnopqrstuvwxyz";

	for(cnt=0;cnt<nbrcar;cnt++) {
		var car = mail.substr(cnt,1);
		if(goodcar.indexOf(car) >= 0) {
			carAfter = "";
			carBefore = "";
			if(car == "@") {
				if((cnt-1) >= 0) {
					carBefore = mail.substr((cnt-1),1);
				}
				if((cnt+1)<nbrcar) {
					carAfter = mail.substr((cnt+1),1);
				}
				if(cnt>0 && nbrarobase==0 && cnt<(nbrcar-4) && !(carBefore==".") && !(carAfter==".") && !(carBefore=="-") && !(carAfter=="-") && !(carBefore=="_") && !(carAfter=="_")) {
					nbrarobase++;
				} else {
					ret = false;
					break;
				}
			}
			if(car == ".") {
				if((cnt-1) >= 0) {
					carBefore = mail.substr((cnt-1),1);
				}
				if((cnt+1)<nbrcar) {
					carAfter = mail.substr((cnt+1),1);
				}
				if(cnt>0 && cnt<(nbrcar-2) && !(carBefore==".") && !(carAfter==".") && !(carBefore=="-") && !(carAfter=="-") && !(carBefore=="_") && !(carAfter=="_")) {
					nbrpoint++;
				} else {
					ret = false;
					break;
				}
			}

		} else {
			ret = false;
			break;
		}
	}
	if(nbrarobase == 0 || nbrpoint == 0 || mail.substr(0,1) == "." || mail.substr(0,1) == "-" || mail.substr(0,1) == "_" || mail.substr((nbrcar-1),1) == "." || mail.substr((nbrcar-1),1) == "-" || mail.substr((nbrcar-1),1) == "_") {
		ret = false;
	}
	return ret;
}