En perl tendrías algún script como este:
Código:
#!c:/perl/bin/perl.exe
#hacemos la entrada de datos
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 la imprimimos
print "content-type: text/html \n\n";
print "Seleccionaste el producto: $FORM{'producto'}";
exit();
Como verás el código es más que fácil, simplemente haces la entrada de datos (el valor que le pasaste por parámetro desde el html) y luego lo imprimes, claro que debes colocarlo en el formato que quieras, con formulario o lo que sea.
Espero que te sirva y cualquier cosa avisame
Saludos