At Thu, 09 Dec 2004 21:05:24 -0600, Will Schroeder wrote:
> 1: in a pattern match like [$ if ( $fdat{QC} =~ m/(\d+)/ ) $]
> [- $num = $1 -]
> for example. The $1 variable never seems to get populated during the
> match like in a regular old perl script.
aiui, the value of $1, etc variables are "l
Am Freitag, 10. Dezember 2004 04:05 schrieb Will Schroeder:
> I did get it to work with this:
> [- $req_rec = shift; -]
> [- my $udat = HTML::Embperl::Req::SetupSession($req_rec); -]
You don't need these two lines! Just use %udat. Embperl sets it up for you.
> I just forgot that the default cook
I did get it to work with this:
[- $req_rec = shift; -]
[- my $udat = HTML::Embperl::Req::SetupSession($req_rec); -]
I just forgot that the default cookie expires when the browser closes so
the session is lost without changing the timeout on the cookie. duh
I do have a couple of observations:
> BTW: when I get this to work I will be more that happy to
> fully document what I did post it back here.
> Apache 1.3.33, embperl 1.3.6, mod_perl 1.2.9, apache::session
> 1.6, apache::sessionX 2.00b5 The Trying to restore session page:
> [- use Apache::Session::MySQL; -]
> [- use Apache; -]
> [
Will Schroeder wrote:
snip
The Trying to restore session page:
[- use Apache::Session::MySQL; -]
[- use Apache; -]
[- use DBI; -]
[- $req = shift; -]
[- $r -> GetSession; -]
shouldn't this be?
[- $req->GetSession; -]
you are getting the request into $req then trying to use $r which has
not