Programação  
 
Conhecimento computador >> Programação >> Programação Perl >> 
Como verificar um Perl -mail
Perl é uma linguagem de programação normalmente usado em máquinas e servidores para automatizar tarefas administrativas comuns, como verificar o endereço de email fornecido por um usuário para ver se ele é válido e se encaixa no padrão de endereço de e-mail Linux. Para fazer isso , a chave é a sintaxe padrão de correspondência conhecido como " Expressões Regulares ". Instruções
1

Abra um novo arquivo de texto. Você pode usar qualquer editor de texto que você preferir, a partir do Windows Bloco de Notas para um dedicado PERL Integrated Development Environment (IDE) , como EPIC ou Padre . No entanto, os processadores de texto grande escala como o Microsoft Word são inadequadas , já que eles não fazem, por padrão, a saída de texto simples .
2

indicam que este é um arquivo perl colando a seguinte linha no topo do arquivo de texto :

# /usr /bin /perl
3

armazenar um endereço de e-mail na memória :

$ email = " meuemail \\ @ email.com ";

Observe que o" símbolo @ " deve ser precedido ( precedido ) com uma barra invertida para deixá- perl sabe que é parte do texto e não o código
4 .

Compare-a com a expressão regular de teste e-mail para ver se ele se encaixa no padrão de um e-mail padrão :

if ($ email = ~ m /^ [ a- Za- z0 - 9._ % + -] + @ [A- Za- z0 -9 -] + \\ [A- Za- z] {2,4 } $ /) {

print " Sim". ; . .

} else {

print " Não" ;

}

o operador "= ~" diz Perl para comparar uma string para uma expressão regular, e os seguintes expressão regular determina que a cadeia deve conter uma série de letras e dígitos , seguido por um sinal de @ , seguido novamente por uma série de números e dígitos e, por fim , pelo menos, uma extensão entre dois e quatro caracteres de tamanho.

5

Salve seu trabalho com o nome do arquivo " emailtest.pl ". Você pode executar o teste digitando " perl emailtest.pl " em uma linha de terminal ou de comando.

Anterior :

Próximo : No
  Os artigos relacionados
·Como determinar como os elementos Muitos estão em um a…
·Como executar Perl De PowerShell 
·Como verificar se uma string existe em Perl 
·Como obter um tamanho da matriz em Perl 
·Como usar o Twitter Net PERL 
·Como remover todos os espaços em branco em uma string …
·Como instalar o PPM De CPAN 
·Como dividir Além URLs em Perl 
·Como criar um arquivo usando Perl 
·Como converter uma matriz para uma String em Perl 
  Artigos em destaque
·Como remover cookies em Java 
·Como escrever API PHP Classes Pull em um servidor remot…
·Como liberar uma consulta Log lento no MySQL 
·Como escrever uma função Mad Lib 
·Como usar ponteiros em C + + 
·Como Integrar Com ColdFusion 
·Como criar tabelas a partir DIVs em PHP 
·Como escrever um script Live Messenger 
·Como determinar as coordenadas de um elemento em JavaSc…
·Como usar o Drools Com Groovy 
Cop e direita © Conhecimento computador http://ptcomputador.com Todos os Direitos Reservados