Curso de CGI

Dividindo as Informações em Pares Nome/Valor

A seguir é preciso dividir as informações dos pares nome/valor. Siga o exemplo:

read(STDIN, $buffer, $ENV{‘CONTENT_LENGTH’});
@pairs = split(/&/, $buffer);
foreach $pair (@pairs)
{
($name, $value) = split(/=/, $pair);
$value =~ tr/+/ /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack(“C”, hex($1))/eg;
$form{$name} = $value;
}

Primeiro leia o STDIN até o final do string, tal como é definido pelo uso de $ENV{‘CONTENT_LENGHT’}. Em seguida, separe as linhas, dividindo a linha quando encontrar o E comercial (&), na lista @pairs. Neste ponto, temos vários pares nome/valor e substituir os sinais de adição pelos espaços apropriados.

(Lembre-se de que, ao enviar o string de dados para o servidor, os espaços são substituídos pelo sinal de adição.) Então é preciso converter os caracteres especiais de volta a seu formato ASCII. Em seguida, coloque cada nome/valor na lista $form, para que então possamos chamar cada par nome/valor usando $form{‘name’}. ]

2 comentários

  1. otimo curso pra quem gosta de construi paginas dinâmicas.

  2. LAURA

    Olá… Desculpe se as pergunta forem básicas, mas sou autodidata e pergunto para entender bem.
    No caso de tabelas, como ficaria?
    Qual é a função do ? E a linha de comando é um desvio para a buycar.pl. Sempre será essa extensão pl?

Deixe uma resposta

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *