【总结】关于LWP的cookie

    最近一直工作好好的脚本，突然一天上传下载操作都不工作了。该脚本主要功能就是使用LWP模块去livelink网站上发布文档，下载一些txt文件。

    后来我试试改了下代码：

    将

    $self->{browser} = new LWP::UserAgent(); $self->{browser}->agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; en-GB; rv:1.9.0.5)"); $self->{browser}->cookie_jar({ file => "$ENV{HOME}/.cookies.txt", autosave => 1 });

 

    改成了

    $self->{browser} = LWP::UserAgent->new(); $self->{browser}->cookie_jar( {} ); 

 

    就好了。

    可是，又过了几天，这段代码也不好用了
    于是我决定写死cookie试试看能不能抓成功，就用firebug去看网页的cookie是多少，然后设置下header中的cookie，就又能抓成功了。

my $agent=new LWP::UserAgent;
my $cookie = 'xxxxxxx';
$agent->default_header('cookie' => $cookie);

    总结：由于LWP和实际的浏览器还是有区别的，一般来说，当脚本获取结果和浏览器的有出入时，可以考虑一下在header中加入cookie， referer这些东西，尽量模拟成跟浏览器访问一样。