Foro - Perl en Español

Publicado: **2005-10-05 15:18 @679**

Hola estoy utilizando cookies para un proyecto, las uso en vez de sesiones, si el usuario es reconocido le creo una cookie con su login y password, y en cada pagina la verifico y sino existe la cookie la regreso a que vuelva a registrarse como el siguiente codigo:

if (!defined $ENV{'HTTP_COOKIE'})
{
print"No ha iniciado Sesion";
print ("<head><META HTTP-EQUIV=\"refresh\" CONTENT=\"1;URL=http://login.htm\"> </head>")
}
else{....}

Todo esta bien

mientras no utilize un form para ir a la siguiente pagina como por ejemplo:

<form action "/cgi-bin/paginasig.pl">
<input type="submit" name="Submit" value="pasa a la siguiente">
</form>

La pagina "paginasig.pl" hace lo mismo que el primer ejemplo verifica la cookie y etc, pero ahi ya no lee nada de cookies, como si se perdiera.
¿Alguna idea de como solucionar esto?

Publicado: **2005-10-05 22:24 @975**

Como estás enviando la cookie ???

Saludos
PD: Es muy peligroso mandar el password también en la coockie, mandá solo el nombre de usuario...

Publicado: **2005-10-05 22:41 @987**

Hola

Asi creo la cookie
my $query=new CGI;
my $cookie=$query->cookie(
-name=>'ID',
-value=>"$dbUser;$dbPassword",
-path=>'/',
-domain=>'ip',
-secure=>0);
print $query->header(-cookie=>$cookie); *asi la mando

Publicado: **2005-10-05 23:03 @002**

Ummm

si creas tu cookie usando el módulo CGI porque no hacer lo mismo para leerlas:

http://search.cpan.org/~lds/CGI.pm-3.11 ... TP_COOKIES

Código: Seleccionar todo: use CGI; $query = new CGI; $riddle = cookie('riddle_name'); %answers = cookie('answers');

SALUDOS

P.D: Realmente te recomiendo checar el módulo CGI::Session, es realmente sencillo de usar, es bastante seguro y te va a salvar de muchos dolores de cabeza. :wink:

Foro - Perl en Español

Cookies

Cookies