Tema: CGI y Script
Pregunta: Como tomo los datos del formulario o del HTML ?
Respuesta: Capturamos los datos, tanto por GET como por POST
Código:
if ($ENV{'REQUEST_METHOD'} eq 'POST') {
read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
} else {
$buffer = $ENV{'QUERY_STRING'};
}
@pairs = split(/&/, $buffer);
foreach $pair (@pairs) {
($name, $value) = split(/=/, $pair);
$name =~ tr/+/ /;
$name =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$value =~ tr/+/ /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$FORM{$name} = $value;
}
Ahora podemos ver la info del formulario con $FORM{'nombre_campo_html'} como por ejemplo $FORM{'nombre'} , $FORM{'email'} ...
O con el módulo CGI...
Código:
#!/usr/bin/perl
use strict;
use CGI;
my $cgi = new CGI;
my %FORM = $cgi->Vars;
Saludos