将netscape cookies转换为LWP perl

时间:2015-01-11 12:23:59

标签: perl cookies lwp netscape

我正在尝试将从Firefox导出的Netscape格式的Cookie转换为LWP格式,以便在另一个只在LWP格式中使用Cookie的库中使用它们。我正在使用这个脚本

#!/usr/bin/perl

use LWP;
use HTTP::Cookies;
use Data::Dumper;

my $in =  'cookies.txt';
my $out = 'cookies.lwp';
my $c = HTTP::Cookies::Netscape->new;
$c->load($in);
print Dumper($c);
$c->HTTP::Cookies::save($out);

exit;

但我得到空的LWP cookie文件,并且Dumper打印

$VAR1 = bless( {
                 '' => 'cookies.txt',
                 'COOKIES' => {}
               }, 'HTTP::Cookies::Netscape' );

为什么HTTP:Cookies无法以Netscape格式读取我的cookie文件?

1 个答案:

答案 0 :(得分:0)

使用此扩展程序,我已导出Cookie并且所有内容都已正确转换:

https://addons.mozilla.org/en-us/firefox/addon/export-cookies/