[Cascavel-pm] Problema com sCGI::Session no windows

[Alex Falcão]

Salve,

    pessoal, estou tentando utilizar CGI::Session no windows, no Linux
funciona legal.

o esperado é que ele gere uma nova sessao caso o usuário ainda não tenha o
cookie na máquina.

A parte de criação do cookie esta OK, o problema esta na criação do session.

Obrigado a todos

<code>
#!c:/arquivos de programas/perl/bin/perl -w

use CGI;      # or any other CGI:: form handler/decoder
use CGI qw(param);
use CGI::Session;

my $cgi = new CGI;

my $SESS_ID=$cgi->cookie('SESS_ID');
if ($SESS_ID) {
        $session = CGI::Session->load("driver:File", $SESS_ID,{"Directory"
=> 'D:/TEMP/'});
        $code = $session->param(-name=>'user_code');
} else {
        $session = CGI::Session->new("driver:File", undef,{"Directory" =>
'D:/TEMP/'}) || die("Nao pode criar sessao");
}

</code>
-- 
___________________________________________
Alex Esteves Jaccoud Falcão
Analista de Suporte
Linux User: 160008


---------------------------------------------------------------
Universia - Esse é o seu Universo.
www.universia.com.br