[Perl] cookies

Mon, 15 Dec 2003 10:36:51 -0600 (CST)

Del Man de CGI:

To create multiple cookies, give header() an array
reference:

$cookie1 =
$query&#8208;>cookie(&#8208;name=>’riddle_name’,
                           &#8208;value=>"The Sphynx’s
Question");
$cookie2 =
$query&#8208;>cookie(&#8208;name=>’answers’,
                           &#8208;value=>\%answers);
print
$query&#8208;>header(&#8208;cookie=>[$cookie1,$cookie2]);

y el browser es el que determina a donde se guardan
las cookies!!

 --- John Robeto <johnroberto2001@yahoo.es> escribió:
> Hola a todos.
> 
> Alguien que me diga cómo crear VARIAS cookies con
> Perl
> que después intento recuperar. Hasta ahora solo he
> conseguido enviar (y recuperar) una con este código:
> 
> my $cookie_out = $query->cookie(-name=>'objeto',
>    -value=>'objeto_1',
>    -expires=>'+24h',
>    -path=>'/',
>    -secure=>0);
> 
> print $query->header(-cookie=>$cookie_out);
> 
> Ha y dónde se guardan estas cookies, gracias.
> 
> John
> 
>
_______________________________________________________________
> Yahoo! Sorteos
> ¡Ya puedes comprar Lotería de Navidad!
> http://yahoo.ventura24.es/
> _______________________________________________
> Perl mailing list
> Perl@tlali.iztacala.unam.mx
> http://tlali.iztacala.unam.mx/mailman/listinfo/perl 

=====
** No more Windows for Me **

.:||:. 13a. Generacion de Informatica: UNAM .:||:.

perl -e "print map( { chr } ('012105099104032098105110032114111111116044032097108115111032100097114102032100097115033010009066114079097100067097083116') =~ /.../g ),\"\n\";"

_________________________________________________________
Do You Yahoo!?
La mejor conexión a internet y 25MB extra a tu correo por $100 al mes. http://net.yahoo.com.mx