Ver Mensaje Individual
  #5 (permalink)  
Antiguo 02/11/2004, 05:43
Avatar de monoswim
monoswim
$moderador{'Esteban'}
 
Fecha de Ingreso: febrero-2002
Ubicación: Buenos Aires - Argentina
Mensajes: 8.762
Antigüedad: 22 años, 2 meses
Puntos: 90
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
__________________
Esteban Quintana