Foros del Web » Programación para mayores de 30 ;) » Programación General »

Paginas tipo ver.cgi?id=holamundo COMO???

Estas en el tema de Paginas tipo ver.cgi?id=holamundo COMO??? en el foro de Programación General en Foros del Web. Hola un saludo antes que nada. Soy nuevo en esto y tengo alojada una pagina en Netfirms que me da una carpeta CGI-BIN y quisiera ...
  #1 (permalink)  
Antiguo 16/01/2004, 15:07
Avatar de ej1236  
Fecha de Ingreso: noviembre-2002
Ubicación: Chemax Yucatan Mexico
Mensajes: 113
Antigüedad: 22 años
Puntos: 0
Exclamación Paginas tipo ver.cgi?id=holamundo COMO???

Hola un saludo antes que nada.
Soy nuevo en esto y tengo alojada una pagina en Netfirms que me da una carpeta CGI-BIN y quisiera usar las tipicas paginas dinamicas ver.cgi?id=holamundo.

alguien sabe como hacerlo en CGI??

de antemano le agradezco sus comentarios

gracias.


edwin.
__________________
-------------------------------
>> EJ1236...

Última edición por ej1236; 17/01/2004 a las 12:54
  #2 (permalink)  
Antiguo 23/01/2004, 14:49
Avatar de monoswim
$moderador{'Esteban'}
 
Fecha de Ingreso: febrero-2002
Ubicación: Buenos Aires - Argentina
Mensajes: 8.762
Antigüedad: 22 años, 9 meses
Puntos: 90
facil!!!

primero que nada cuando el script comienza, tienes que leer cuales son los parámetros que le fueron mandanos (id=holamundo)

eso lo haces de la siguiente forma:

my (@pairs,$buffer,$pair,$name,$value,%input_data);

if ($ENV{'REQUEST_METHOD'} eq 'GET') {

@pairs = split(/&/, $ENV{'QUERY_STRING'});

}elsif ($ENV{'REQUEST_METHOD'} eq 'POST') {

read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
@pairs = split(/&/, $buffer);

}else {

&error('leer','datos');

}

foreach $pair (@pairs) {
($name, $value) = split(/=/, $pair);

$name =~ tr/+/ /;
$name =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$name =~ tr/\0//d;

$value =~ tr/+/ /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$value =~ tr/\0//d;

$input_data{$name} = $value;
}


De esta forma tienes una variable hash con los parámetros de entrada al sctips. Ahora bien, hoy que empezar a ver que es lo que dicen esos parámetros:

if ($input_data{'id'} eq 'holamundo') {
print "content-type: text/html \n\n hola mundo";
}elsif ($input_data{'id'} eq 'chaumundo') {
print "content-type: text/html \n\n chau mundo";
}else{
print "content-type: text/html \n\n que dianblos quieres hacer";
}

el content-type: text/html \n\n es para que la salida sea al navegador web.
La verdad es que no tiene nada de sofisticado, dependiendo de la entrada que seea, haces una cosa o la otra.

Espero que te sirva
MonoSwim
__________________
Esteban Quintana
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 14:31.