[Resolvido] Invalidar somente os e-mails inválidos

Boa tarde,

Um cliente me solicitou que validasse o e-mail em seu formulário de contato, no entanto existem alguns domínios que a função considera como inválido, o que posso alterar na função para que isso não ocorra?

Por exemplo: um domínio com hífen ele considera inválido, mas verifiquei no registro.br e existe: crea-pr.org.br

A função

function verifyEmail ($email, $checkDNS = false) {
list($user, $domain) = explode("@", $email);

if(preg_match('/^[^0-9][a-zA-Z0-9_]+([.-][a-zA-Z0-9_]+)[@][a-zA-Z0-9_]+([.][a-zA-Z0-9_]+)[.][a-zA-Z]{2,4}$/',$email)) {

	if ($checkDNS){
 if(@checkdnsrr($domain, 'MX')){
 return(true);
 }
	} else
 return true;
}
}

Agradeço