RE: [cgiapp] [cookies] Having problems getting info out of my cookie

["Jesse Erlbaum" <suppressed>]

Hi Paul --

> BTW - I'm not sure if there's any bearing but I set the cookie in
> one run mode
> and then do "return $self->run_mode_2()" to switch to the run
> mode which checks
> the cookie. The only thing I can think of is that $self->query()
> is not updated
> when I switch run modes this way ?


That is probably the problem.  If you're calling another run-mode directly
(as opposed to the run-mode being called via an HTTP request) the cookie you
created has not yet been sent to the web browser.  That won't happen until
run_mode_2() is done.

There are a couple solutions I can think of.  First, you can internally pass
that data to run_mode_2() when you call it.  Second, you could use a
redirect to get to run_mode_2() instead of a direct call:

	sub run_mode_1 {
		my $self = shift;
		my $q = $self->query();

		my %cookie_values = (
			login   => $uname,
			email   => $email,
			name    => $fullname
		);

		my $cookie = new CGI::Cookie(
			-name    =>  'techweb',
			-value   =>  \%cookie_values,
			-expires =>  '+1h',
		);

		# Set up redirect, set cookie
		my $new_url = $q->url(-full=>1) . '?rm=run_mode_2';
		$self->header_type('redirect');
		$self->header_props(
			-cookie => $cookie,
			-url    => $new_url
		);

		my $output = "Redirect $new_url";
		return $output;
	}


This will set your cookie and send the user back to run_mode_2 via HTTP
request.  When they get to run_mode_2 they will have the cookie you need.


TTYL,

-Jesse-


--

  Jesse Erlbaum
  The Erlbaum Group
  suppressed
  Phone: 212-684-6161
  Fax: 212-684-6226



---------------------------------------------------------------------
Web Archive:  http://www.mail-archive.com/suppressed/
To unsubscribe, e-mail: suppressed
For additional commands, e-mail: suppressed