4. PERL: Manipulação de Strings

Uma das potencialidades do PERL mais úteis para o programador de CGI é a manipulação de strings As principais funções existentes no PERL são:

Arrays de strings:

• push(array, string): Acrescenta string como último elemento de array.
• pop(array):Retira o último elemento de array e devolve-o.
• shift(array): Retira o primeiro elemento de array e devolve-o.
• unshift(array, string) : Acrescenta a string como primeiro elemento do array.
• splice(array, offset, comprimento, var) : substitui a cadeia de caracteres de comprimento a partir de offset de array pelo conteúdo de var.

Manipulação de strings:

• split(caracter, string): Divide a string por troços usando o carácter como separador e devolve um array com os troços de string. Caso só se pretenda o último elemento pode-se usar uma variável para receber o resultado do split e essa variável ficará com o último elemento do array de resultado.
• join(string,array): junta os elementos de array intercalando todos os elementos com a string.
• . : O operador . serve para concatenar strings. Por exemplo:

$minha_var = "i" . "st"; # minha_var = "ist"

• x : Este operador multiplica strings:

$minha_var = "be" x 2; # minha_var = "bebe"

• chop(<string ou array>): esta função retira o último carácter da(s) string(s) do segundo argumento quer seja uma variável quer seja um array.
• lc(string), uc(string): Conversão de string para minúsculas ou para maiúsculas.
• lcfirst(string), ucfirst(string): Conversão da primeira letra de string para minúscula e maiúscula respectivamente.

Busca:

• index(string, substring [,offset]):Indica o índice do carácter de string onde começa a primeira ocorrência de substring em string. Se for indicado um offset a busca só começa a partir desse índice da string. Trata-se de uma busca da esquerda para a direita.
• rindex(string, substring [,offset]): Esta função executa a mesma funcionalidade que a anterior mas executa a sua busca na string da direita para a esquerda.
• $var =~ <padrão>: O padrão pode ter vários formatos:
  • /<expressão regular>/ - neste caso a operação
  • s/<expressão regular>/string/ - substitui a expressão regular pela string indicada.
  • tr/<expressão regular>/string/ - substitui a ocorrência de expressão regular pela string. Se a string não for mais curta que a ocorrência da expressão regular será truncada. Caso contrário o último carácter da string é repetido.

  Qualquer destes padrões pode ser seguido após o último / de letras indicadoras de outras opções:

  • As opções para /<expressão regular>/ e para s/<expressão regular>/string/ são:
    • g : procura de todos os emparelhamentos possíveis. Neste caso, o resultado devolvido pode ser um array.
    • i : ignorar o facto de as letras serem maiúsculas ou minúsculas (case-insesitive search).
    • m : permite a busca numa string constituida por mais de uma linha.
    • s : busca numa string como se fosse só uma linha. Neste caso, o carácter . pode substituir o carácter de fim de linha.
    • x : ignora os espaços em branco.
  • As opções para tr/<expressão regular>/string/ são:
    • c : traduz todos os caracteres que não foram especificados.
    • d : apaga todos os caracteres especificados.
    • s : substitui muliplos caracteres por um único.

Notação de Expressões Regulares:

Os seguintes tópicos explicam quais os caracteres que são válidos numa expressão regular. Note-se que qualquer carácter que tenha um significado especial no âmbito das expressões regulares, pode ser incluido com o seu significado usual numa expressão regular desde que precedido de um \.

• . : ocorrência de um carácter qualquer.
• +: ocorrência de um ou mais caracteres.
• ?: ocorrência de zero ou um caracter.
• *: ocorrência de zero ou mais caracteres.
• -: Serve para indicar intervalos de caracteres. Por exemplo, 0-9 designa os dígitos decimais.
• []: Os parentesis rectos definem uma classe de caracteres. Por exemplo, [0-9a-z] define a classe dos caracteres e das letras minúsculas.
• ^: ocorrência de um início de linha.
• $: ocorrência de um fim de linha.
• {} : Entre chavetas podem-se colocar o número de ocorrências de um padrão.
• | : operador de disjunção (OU)
• \w : Qualquer carácter alfanumérico.
• \W : Qualquer carácter não alfanumérico.
• \d : Qualquer carácter numérico.
• \D : Qualquer carácter não numérico.
• \s : Qualquer carácter em branco.
• \S: Qualquer carácter não em branco.

A página seguinte trata da utilização de sockets em PERL.

Comentários à página devem ser enviados para João Garcia, preferencialmente com o tema: manual_perl.