setting cookie without using $cgi->header(-cookie=>$cookie);

[spewn]

i'm using this:

$cgi = new CGI;
$sid = $cgi->cookie("CGISESSID") || undef;
$session = new CGI::Session(undef, $sid, {Directory=>'/tmp'});
$cookie = $cgi->cookie(CGISESSID => $session->id);
$sSid = $session->id();

and setting the cookie:

print $cgi->header(-cookie=>$cookie);

I want to set the cookie still, but not call up the header...if i call header, then i can't use my redirect.

print "Location: [URL unfurl="true"]http://uk.topsurveyguide.com/?$sSid\n\n";[/URL]

i want to do this:

print $cgi->(-cookie=>$cookie);

but of course that doesn't work.

any ideas?

thanks!

- g

 

[KevinADC]

try using the redirect() function of the CGI module instead of LOCATION. That way you can print the cookies and do the redirect all at once I would think.

------------------------------------------
- Kevin, perl coder unexceptional!