Perhaps I am misunderstanding what ->flush does. In the code example below, $self->{'s'} isa CGI::Session dropping sessions in /tmp/sessions. On the otherside of this redirect, I am finally getting to my destination page (thanks to
ikegami who solved the riddle of the missing hyphens at
this node). However I arrive with a session which does not exist in /tmp/sessions, having lost my authentication and authorization and wind up back at a login prompt.
I have been ignoring for some time that even those sessions which do get written to /tmp/sessions, seem to ignore the fact that I've set and flush'd session parameters, presumably into those files.
Can anyone with a bit more of a handle on how to use CGI::Session shed some light on a path forward, please?
Thanks,
-- Hugh Esco
$self->{'s'}->param('username',$username);
$self->{'s'}->param('uid',$acct_user->{'userid'});
$self->{'s'}->param('account_code',$acct_user->{'account_code'});
$self->{'s'}->flush();
my $redirect = 1;
my $url = $self->{'cfg'}->param("www.dashboard") . '?CGISESSID=' . $se
+lf->{'s'}->id();
$html = $self->{'q'}->redirect(
-uri => $url,
-status => 303 );
print $self->{'s'}->header() unless($redirect);
print $html,"\n";
if( $lal && $lol ) { $life++; }
Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
Read Where should I post X? if you're not absolutely sure you're posting in the right place.
Please read these before you post! —
Posts may use any of the Perl Monks Approved HTML tags:
- a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
| |
For: |
|
Use: |
| & | | & |
| < | | < |
| > | | > |
| [ | | [ |
| ] | | ] |
Link using PerlMonks shortcuts! What shortcuts can I use for linking?
See Writeup Formatting Tips and other pages linked from there for more info.