[Cascavel-pm] "Carregar" session id.

[Rafael Lebrao Martins]

Bom dia, Otávio.. Vou prestar atenção nisso.. Mas o que não estou
conseguindo fazer é "carregar" o session id gerado por esse código, para
todos os outros códigos do programa. Da forma como está hoje, se o usuário
souber o endereço da página de configuração, por exemplo, é só digitar no
browser e acessar, não sendo necessária a autenticação.



2008/1/30, Otávio Fernandes <otaviof em gmail.com>:
>
> Rafael, bom dia,
>
> Nao vejo erros na utilizacao do session ID. Durante a execucao do seu
> codigo apenas corrigi um  erro:
>
> otavio em nexus6:/tmp$ perl lembrao.pl
> Use of uninitialized value in string at lembrao.pl line 16.
> print() on closed filehandle SID at lembrao.pl line 21.
>
> Depois de corrigir, o seu codigo ficou assim:
>
> #!/usr/bin/env perl
>
> use warnings;
> use strict;
>
> use CGI qw ( :standard );
> use CGI::Session qw/-ip-match/;
> use Data::Dumper;
>
> my $file = '/tmp/teste_sid.txt';
> open( my $SID, '>', "$file" );
>
> my $path_sessoes = '/tmp';
> my $login;
>
> my $session = new CGI::Session( "driver:File", undef,
>    { 'Directory' => $path_sessoes } );
>
> $session->param( 'teste_tmg', $login );
> $session->param( '_IDLE_EXPIRY' => time + 1800 );
> $session->expire('+1d');
>
> print Dumper $session;
>
> my $sid = $session->id();
>
> print $SID $sid, "\n";
>
> close($SID);
>
> __END__
>
> E o conteudo do arquivo é:
>
> otavio em nexus6:~/Sources/Perl/Examples$ cat /tmp/teste_sid.txt
> e5e2d2806ca44635980d24ef2dd94a13
>
> Portanto, acredito que voce soh tem que revisar o codigo com um pouco
> mais de atencao e verificar os erros que o interpretador te retorna.
> Eh uma boa oportunidade de melhorar a sua identacao e utilizar o
> Perltidy (com as opcoes -pbp e -ce) e o Perl Critic.
>
> Atenciosamente,
>
> --
> | --
> | Otávio Fernandes < otaviof | gmail | com >
> | FreeBSD 7.0-PRERELEASE && GNU/Linux User: 283.396
> | (( Especial Programação )) http://geekbr.podcastbrasil.com/ -- 0.15
> | --
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20080130/68878177/attachment.html