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

Question

考虑一个有10页（如购物车过程）和登录的网站。 我需要使用Perl LWP浏览最多5页，然后 将Cookie和会话转移到Chrome等浏览器 继续到第10页，再没有给出登录信息。 这可能吗 ？ 如果是这样，请指导我...

由于 的Vivek

Answer 1

是的，这是可能的。如果使用的浏览器与Chromium不同，请使用HTTP-Cookies或HTTP-Cookies-Opera存储LWP Cookie jar。

如果使用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来访问它。