Usando expressões regulares em Perl

valor separado. Um exemplo interessante Considere a seguinte seqüência de caracteres disponíveis: my $ availableString = "https://www.somewebsite.com/dir1/dir2/file.htm"; Este é um URL. Vamos dividir este URL nos seus componentes, isto é, "http:", "www.somewebsite.com", "dir1", "dir2" e "file.htm". O separador aqui é ou uma barra ou uma barra dupla. O padrão para esse separador é: /\\ /{1,2} /O padrão quer entre uma ou duas barras. Isto irá satisfazer as barras simples ou duplas. O código a seguir ilustra isso: use strict; my $ availableString = "https://www.somewebsite.

com/dir1/dir2/file.htm"; meuswords = split /\\ /{1,2} /, $ availableString; imprimir "primeiro elemento é:", $ words [0], "\\ n"; imprimir "segundo elemento é:", $ words [1], "\\ n"; imprimir "terceiro elemento é:", $ words [2], "\\ n"; imprimir "quarto elemento é:", $ words [3], "\\ n"; imprimir "Quinto Elemento é:", $ words [4], "\\ n"; Assim, "http:" torna-se o primeiro elemento da matriz, "www.somewebsite.com", torna-se o segundo elemento da matriz, "dir1" torna-se o terceiro elemento da matriz ", dir2" torna-se o quarto elemento da matriz e "file.htm" torna-se o quinto elemento da matriz.

Os delimitadores que você deve sempre usar as //delimitadores para a regex. No. Perl dá-lhe a possibilidade de usar delimitadores de sua escolha. As expressões a seguir cada um produzir um jogo: "Olá Mundo" = ~ m Olá !; "Olá Mundo" = ~ m {} Olá; "/dir1/dir/perl.exe" = ~ m "/perl\\.exe"; Os delimitadores padrão //para uma partida pode ser alterado para delimitadores arbitrários colocando um 'm' na frente. No primeiro exemplo, os delimitadores são !!. Na segunda expressão os delimitadores são {}. No terceiro exemplo, os delimitadores são "".

O primeiro delimitador de qualquer delimitador par você escolher, deve ser precedida de m. O código a seguir ilustra o primeiro caso: use strict; if ("Olá Mundo" = ~ m Olá!) {print "Matched \\ n"; } Else {print "Not Matched \\ n"; } Uau, temos feito muito. Nós temos apenas uma parte da série para ver. Tudo o que fizemos até agora é bom. Você pode fazer muito com o que temos feito. Mostrei-lhe na parte anterior da série, como lidar com os problemas que estão envolvendo. Na próxima parte da série, que abrange recursos, que você vai querer quando você precisa de mais poder em regex.

Esses recursos nem sempre são usados, mas você precisaria-los ocasionalmente. A próxima e última parte da série é intitulada, mais expressões regulares em Perl. Então, vamos fazer uma pausa