yperl wrote:
> Finally I come with a working solution.
>
> sub getCookie {
>
> my ( $r ) = @_;
>
> # check for both 'Cookie' and 'Set-Cookie' HTTP headers
> return $r->headers_in->{'Cookie'} || $r->headers_in->{'Set-Cookie'};
> }
but that's just wrong :)
Set-Cookie is a response header, so it will be set in $r->headers_out when
the server decides to send a cookie to the client. Cookie is a request
header, so you glean it from $r->headers_in if the client has one to give
you. you'll never see Set-Cookie in $r->headers_in unless someone has made
a grave mistake.
you can see the gory details in the rfc
http://www.ietf.org/rfc/rfc2109.txt
HTH
--Geoff