trying to set cookie without cgi->header...my page redirects...

[spewn]

hello!

i'm trying to set a cookie value, then redirect my page, but i can't seem to find any information on how to do this.

here's my code:

#!/usr/bin/perl
use CGI qw(:standard);

#set cookie here

print "Location: [URL unfurl="true"]http://newurl.com\n\n";[/URL]

only thing i can find is how to set it with the header...

besides setting it that way, then calling a javascript redirect, is there another way?

thanks!

- g

 

[Kirsle]

print $q->header (
   -cookie => $cookie,
   -location => "[URL unfurl="true"]http://newurl.com",[/URL]
);

Or print the cookie header manually, they look like this:

Set-Cookie: RMID=732423sdfs73242; expires=Fri, 31-Dec-2010 23:59:59 GMT; path=/; domain=.example.net

Cuvou.com | My personal homepage

perl -e '$|=$i=1;print" oo\n<|>\n_|_";x:sleep$|;print"\b",$i++%2?"/":"_";goto x;'

 

[ScottPrelewicz]

Another way to do it is with redirect.

my $cgi = CGI->new();
my $cookie = $cgi->cookie(-name => 'mycookie', -value => '1');
print $cgi->redirect(-uri => '[URL unfurl="true"]http://www.google.com/',[/URL] -cookie => $cookie);

Scott Prelewicz
Web Developer
COMAND Solutions