Gracias por tu respuesta. Parece que me extendi mas de la cuenta. En resumen, tengo un script donde se supone se crean variables de sesion. pero al pasar ala pagina siguiente, se pierden.
Aqu va mas ordenado:
index.cgi
Código:
use CGI::Session;
use CGI qw/:standard/;
use SIE::GeneralCgi;
#aqui le paso dos datos en duro, ya que es de prueba
my $cookie = 5568254;
my $sesion = 2556565;
my $result = $data->acceso($cookie, $sesion);
$id_usuario = @$result[0]->{id};
$nombres = @$result[0]->{nombres};
$apaterno = @$result[0]->{apaterno};
$session->param('id_usuario', $id_usuario);
$session->param('nombres', $nombres);
$session->param('apaterno', $apaterno);
$session->param('login', $login);
#aqui empieza mi confucion!!
$cookie_session = cookie(-name=>'CGISESSID',-value=>$session->id());
print header(-cookie=>$cookie_session);
print "<meta http-equiv='refresh' content='0;URL=main_frame_access.cgi'>";
Código:
use CGI::Session;
use CGI qw/:standard/;
use SIE::GeneralCgi;
use HTMLTMPL;
$IdUsuario = $datos->{session}->{id_usuario};
$IdPerfil = $datos->{session}->{id_perfil};
$login = $datos->{session}->{login};
print $IdUsuario;
exit;
$strUrlToolBar = 'main_access.cgi';
$strUrlMain = 'access.cgi';
$templ = new HTMLTMPL;
$templ->src($ini->get(['ARCHIVO', 'TPL']).'\main_frame.html');
$templ->url_toolbar("$strUrlToolBar");
$templ->url_main("$strUrlMain");
$templ->output('Content-Type: text/html');
el print $IdUsuario;exit; no entrega nada, es decir, nunca propago la secion....