Email erkennen

[FraFu]

Hallo!

Hier mal meine Version:

  
function validateEmail($email){  
 $topLevelDomains=array("com","biz","info","org","net","gv","gov","ac","ad","ae","af","ag","ai","al","am","an","ao","aq","ar","as","at","au","aw","az","ax","ba","bb","bd","be","bf","bg","bh","bi","bj","bm","bn","bo","br","bs","bt","bv","bw","by","bz","ca","cc","cd","cf","cg","ch","ci","ck","cl","cm","cn","co","cr","cs","cu","cv","cx","cy","cz","de","dj","dk","dm","do","dz","ec","ee","eg","eh","er","es","et","eu","fi","fj","fk","fm","fo","fr","ga","gb","gd","ge","gf","gg","gh","gi","gl","gm","gn","gp","gq","gr","gs","gt","gu","gw","gy","hk","hm","hn","hr","ht","hu","id","ie","il","im","in","io","iq","ir","is","it","je","jm","jo","jp","ke","kg","kh","ki","km","kn","kp","kr","kw","ky","kz","la","lb","lc","li","lk","lr","ls","lt","lu","lv","ly","ma","mc","md","mg","mh","mk","ml","mm","mn","mo","mp","mq","mr","ms","mt","mu","mv","mw","mx","my","mz","na","nc","ne","nf","ng","ni","nl","no","np","nr","nu","nz","om","pa","pe","pf","pg","ph","pk","pl","pm","pn","pr","ps","pt","pw","py","qa","re","ro","ru","rw","sa","sb","sc","sd","se","sg","sh","si","sj","sk","sl","sm","sn","so","sr","st","sv","sy","sz","tc","td","tf","tg","th","tj","tk","tl","tm","tn","to","tp","tr","tt","tv","tw","tz","ua","ug","uk","um","us","uy","uz","va","vc","ve","vg","vi","vn","vu","wf","ws","ye","yt","yu","za","zm","zw");  
 $email=strtolower($email);  
  
 $aTmp=split("@",$email);  
 list($name,$server)=$aTmp;  
 if(count($aTmp)!=2) // More than one at sign  
  return false;  
 if($name=="") // name part is empty  
  return false;  
  
 $domains=split("\.", $server);  
 if(count($domains)<2)  
  return false; // no correct domain syntax  
  
 if(!in_array($domains[count($domains)-1],$topLevelDomains))  
  return false; // top level domain is not in list  
  
 foreach($domains as $d) // .. in domain  
  if(strlen($d)==0) return false;  
  
 // If script reaches here -> email address is almost ok  
 return true;  
}  
  

mfg
  frafu