A função de "m" Perl é usado para encontrar uma string em uma variável ou arquivo . Isto é útil se você está tentando encontrar uma linha específica em um arquivo, como uma linha de alerta em um arquivo de log. Ele também pode ser usado para verificar se um valor enviado pelo usuário contém as informações corretas . Você pode combinar uma string literal ou você pode usar expressões regulares --- uma maneira de usar coringas para representar um caractere ou conjunto de caracteres . Instruções
1
Abra um documento de texto simples em qualquer editor de texto.
2
Digite a linha
# /usr /bin /perl < br >
para iniciar o script perl
3
Digite as linhas
my $ my_string ; .
$ my_string = " Este é um exemplo string "; .
print $ my_string " \\ n ". ;
para criar e imprimir a variável que contém o texto" Este é um exemplo de seqüência "
4
Digite as linhas
if ($ my_string = ~ m /test /i)
{print " Sim, foi encontrada a string ' teste ' \\ n "; }
mais
{print "O ' teste ' string não foi encontrado \\ n "; }
para criar o " if" que verifica para ver se o "teste" corda existe.
5
Digite as linhas
if ($ my_string = ~ m /example /i )
{print " Sim, o ' exemplo ' string foi encontrado \\ n "; }
mais
{print" ! O string ' exemplo ' não foi encontrado \\ n "; }
criar as if que verifica para ver se existe a string " exemplo " .
6
Salve o arquivo como " match.pl " .
7
Digite o comando " perl match.pl " no prompt de comando para testar o script.