• Publicidad

Como cargo una sesión con el CGI::Session

¿Ya sabes lo que es una referencia? Has progresado, el nível básico es cosa del pasado y ahora estás listo para el siguiente nivel.

Como cargo una sesión con el CGI::Session

Notapor danimera » 2006-06-17 08:49 @409

Bueno parece extraño, pero tengo dos archivos:

Login.pl
En este primero creo la sesión con el CGI::Session correctamente y paso con el print $s->header(), la sessión por cookies,

Admin.pl
En este archivo quiero validar la session, pero solo puedo cargarla cuando uso ID estáticos., por ejemplo:
$s = CGI::Session->load("sdd989ere4354564345") la carga bien.

Pero, ¿cómo hago para cargar una session que creé en Login.pl en mi archivo admin.pl si cuando uso la función load por defecto, después obtengo que la session esta vacía? Me doy cuenta por el is_empty.
Avatar de Usuario
danimera
Perlero frecuente
Perlero frecuente
 
Mensajes: 871
Registrado: 2005-06-23 19:02 @834
Ubicación: Colombia

Publicidad

Notapor kidd » 2006-06-17 09:30 @437

Hola:

Me parece que no se está creando tu cookie de manera correcta, recuerda que el $session->header() debe de ir antes de que escribas el content-type.

Saludos
Uriel Lizama Perl programmer fundador de Perl en Español
Perl Programming Language
Avatar de Usuario
kidd
Creador de Perl en Español
Creador de Perl en Español
 
Mensajes: 1166
Registrado: 2003-10-15 16:52 @744
Ubicación: México

Sessiones en CGI

Notapor danimera » 2006-06-17 11:32 @522

he intentado muchas cosas Kid, que hasta me atrevo a pregutar

Que porcentaje de posibilidad existe que me halla quedado mal instalado el modulo de session, aunque ahora que recuerdo proble una aplicacion con CGI::Session y me funciono bien.

El hecho es que la seccion me carga vacia, quizas el problema es que no carga el ID de la sesion,, bueno tambien, como podria relacionar la sesion con mi plantilla pues uso HTML-Template
Avatar de Usuario
danimera
Perlero frecuente
Perlero frecuente
 
Mensajes: 871
Registrado: 2005-06-23 19:02 @834
Ubicación: Colombia

Notapor explorer » 2006-06-17 11:46 @532

¡Respondida!

¿Es posible que no se pueda crear el fichero de sesión porque no tengas permisos de escritura?

Código: Seleccionar todo
#!/usr/bin/perl
#
# Ejemplo de CGI::Session
#

use CGI ':standard';
use CGI::Session;

my $session =
   CGI::Session->new("driver:File",undef,{'Directory'=>'/tmp/'})
       or die CGI::Session->errstr;

print $session->header();
my $contador = $session->param('contador');
$contador++;
$session->param('contador', $contador);

print
        start_html('Prueba CGI::Session'),
        h1('Contador'),
        hr,
        p({align=>'center'}, $contador),
        end_html;
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España


Volver a Intermedio

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 12 invitados

cron