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

Question

考虑一个拥有10个页面（如shopcart进程）和登录的站点。 我需要使用Perl LWP浏览多达5页，然后 将cookies和会话传输到Chrome等浏览器，然后 继续到第10页，而不再提供登录信息。 这可能吗？ 如果有，请告诉我这个...

感谢 维韦克

Answer 1

是的，这是可能的。如果使用与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访问它。