Retornar somente e-mails válidos
Publicado por Romulo 15/09/2003
[ Hits: 6.433 ]
Recebe um arquivo contendo uma lista de e-mails separados por quebra de linha e retorna somente os endereços válidos. Além de verificar a sintaxe do e-mail, também pode verificar se existe um servidor de e-mail válido para o domínio.
#!/usr/bin/perl -w # valida_email.pl # Recebe um arquivo contendo uma lista de e-mails separados por # quebra de linha e retorna somente os endereços válidos. # # Programado por: Fábio Berbert de Paula # <fabio@vivaolinux.com.br> # http://www.vivaolinux.com.br # # Rio de Janeiro, 15 de Setembro de 2003 # # Para instalar o módulo Email::Valid no Debian digite: # apt-get install libemail-valid-perl use Email::Valid; my $lista = shift or die "Use: $0 lista_de_email.txt\n"; if (! -f $lista) { print "Erro: $lista não é um arquivo válido\n"; exit; } open(READ, $lista); while (<READ>) { chomp; if (Email::Valid->address($_)) { print $_ . "\n"; } # descomente as linhas abaixo e comente as acima se desejar # verificar se existe um host válido para o endereço de # e-mail informado. # # if (Email::Valid->address(-address => "$_", -mxcheck => 1)) { # print $_ . "\n"; # } } close(READ);
Notificador de Gmail no Conky.
Apagar spam na fila do postfix por palavra
Retorna apenas emails válidos com MX válidos
Como gerar qualquer emoji ou símbolo unicode a partir do seu teclado
Instalar e Configurar o Slackware Linux em 2025
Como configurar os repositórios do apt no Debian 12 em 2025
Passkeys: A Evolução da Autenticação Digital
Instalação de distro Linux em computadores, netbooks, etc, em rede com o Clonezilla
Configurando o Conky para iniciar corretamente no sistema
3 configurações básicas que podem melhorar muito a sua edição pelo editor nano
Como colorir os logs do terminal com ccze
Instalação Microsoft Edge no Linux Mint 22
Como configurar posicionamento e movimento de janelas no Lubuntu (Openbox) com atalhos de teclado