在Perl中使用LWP如何将cookie传输到浏览器

问题描述

| 考虑一个有10页的网站（例如shopcart流程）并登录。 我需要使用Perl LWP浏览多达5页，然后 将Cookie和会话传输到Chrome等浏览器，然后 继续到那里的第10页，而无需再次提供登录信息。 这可能吗 ？ 如果是这样，请直接指导我... 谢谢 维维克     

解决方法

是的，有可能。如果使用的浏览器与Chromium不同，则将LWP cookie罐与HTTP-Cookies或HTTP-Cookies-Opera一起存储。 如果使用Chromium，则必须自己编程。该存储是一个简单的Sqlite3数据库。

$ echo .schema | sqlite3 ~/.config/chromium/Default/Cookies
CREATE TABLE cookies (creation_utc INTEGER NOT NULL UNIQUE PRIMARY KEY,host_key TEXT NOT NULL,name TEXT NOT NULL,value TEXT NOT NULL,path TEXT NOT NULL,expires_utc INTEGER NOT NULL,secure INTEGER NOT NULL,httponly INTEGER NOT NULL,last_access_utc INTEGER NOT NULL);
CREATE TABLE meta(key LONGVARCHAR NOT NULL UNIQUE PRIMARY KEY,value LONGVARCHAR);
CREATE INDEX cookie_times ON cookies (creation_utc);

我可以建议使用DBIx :: Class :: Schema :: Loader进行访问。