... que es
justo lo que hace Mechanize en una línea de programa.
Using perl Syntax Highlighting
use WWW
::Mechanize;
my $mech = WWW
::Mechanize->new(
agent
=> 'wonderbot 1.01',
cookie_jar
=> { file
=> "$ENV{HOME}/.cookies.txt" },
);Coloreado en 0.004 segundos, usando
GeSHi 1.0.8.4
Y con eso ya tienes definido un fichero donde guardar las galletas, que, de forma automática, el módulo utilizará en todas las peticiones. Puedes cerrar el programa y volverlo a abrir, y las galletas seguirán estando allí.
Incluso puedes definir una jarra de galletas en la memoria del programa:
Using perl Syntax Highlighting
cookie_jar
=> { },Coloreado en 0.001 segundos, usando
GeSHi 1.0.8.4
con lo que sigue funcionando igual, solo que las galletas se pierden si el programa termina. Depende de cómo quieras resolver el problema.