[Cascavel-pm] Como validar um e-mail?

[Jorge Augusto Senger]

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

#----

use Data::Validate::Email qw(is_email is_email_rfc822);

my $email;
my $v = Data::Validate::Email->new();
if ($v->is_email($email))
{
	print "É um e-mail válido\n";
}
else
{
	print "Não é um e-mail válido\n";
}

#----

Sandro de Almeida Filho escreveu:
> Então aceitando apenas:
> "@", "-", ".", "_", "+", letras e números (os demais não são necessários).
> 
> O regex abaixo não funcionou (ou usei de forma errada)
> $email =~ /^[\._\w]+@[\._\w]+$/;
> 
> Gostaria de fazer uma if, falando se tal $email é válido ou não...
> 
> []'s
> Sandro
> 
> 
> Em 03/05/07, Nilson Santos Figueiredo Junior<acid06 em gmail.com> escreveu:
>> On 5/3/07, Sandro de Almeida Filho <sandroalmeidafilho em gmail.com> wrote:
>>> Gostaria de verificar se esse e-mail é válido no seguinte formato:
>>> - Só aceita um arroba (@) -> óbvio
>>> - Só aceita ponto ".", travessão "-" e underline "_".
>> Este formato está incorreto. O caracter + também é permitido em
>> endereços de email, assim como mais alguns outros caracteres.
>>
>> Dê uma lida: http://www.remote.org/jochen/mail/info/chars.html
>>
>> -Nilson Santos F. Jr.
>> _______________________________________________
>> Cascavel-pm mailing list
>> Cascavel-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/cascavel-pm
>>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
> 
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.6 (GNU/Linux)
Comment: Using GnuPG with Mozilla - http://enigmail.mozdev.org

iD8DBQFGOnUSiOnIWGbribERAtMmAJ94ep9qjsALGeHa9vTywQDQEig0ngCgqdc4
eKwPnMRr1N2+mo21rUW983M=
=R7iA
-----END PGP SIGNATURE-----