Mailing-List: contact modperl-help@perl.apache.org; run by ezmlm
Precedence: bulk
Received-SPF: pass (athena.apache.org: local policy)
In-Reply-To: <476F7405.50209@kuicr.kyoto-u.ac.jp>
References: <476F7405.50209@kuicr.kyoto-u.ac.jp>
Mime-Version: 1.0 (Apple Message framework v753)
Content-Type: text/plain; charset=US-ASCII; delsp=yes; format=flowed
Message-Id: <0A898C0B-E780-479C-93EA-048D4EDC4ACE@habitatlife.com>
Cc: modperl@perl.apache.org
Content-Transfer-Encoding: 7bit
From: Boysenberry Payne <boysenberry@habitatlife.com>
Subject: Re: Cookie questions
Date: Mon, 24 Dec 2007 03:29:44 -0600
To: Raymond Wan <rwan@kuicr.kyoto-u.ac.jp>

This is what I do:

$cookie = { name => "foo", value => "bar" }
my $data = [];
push( @$data, Apache2::Cookie->new( $r, %{$cookie} ) );
foreach ( @$data ) {
	$_->bake( $r );
}

Hope it helps...

-bop

On Dec 24, 2007, at 2:55 AM, Raymond Wan wrote:

>
> Hi all,
>
> Sorry, but I'm not entirely sure if this is relevant to modperl...
>
> I was wondering if it was possible to delete cookies.  I read that  
> using Javascript, cookies can be deleted by setting it to a time in  
> the past.  I'm not sure how to do it in Mason, though.  I think I  
> know how to get a cookie and also to set a new one and send it  
> out.  But, I don't know how to get an old cookie, change it, and  
> send it back.  Or even, get a cookie, *copy it*, send the copy  
> back.  What is stopping the browser from creating a second cookie  
> with the same name?
>
> Also, I've seen various ways of setting cookies.  For example, one  
> using APR::Request::Cookie and another using Apache2::Cookie.   
> Which should I use?  I'm setting a cookie by doing:
>
> $r->err_headers_out->add ("Set-Cookie" => $cookie->as_string);
>
> where $cookie is of type APR::Request::Cookie.  Is this strange?   
> (I forgot what I read to come up with this...most other documents  
> mention a "bake" method...)
>
> Ray
>
>