如何使用perl中的WWW::Scripter模块显式清除cookie

How to explicitly clear cookies using WWW::Scripter module in perl?

本文关键字:清除 cookie 模块 Scripter perl 中的 WWW 何使用      更新时间:2023-09-26

简单的perl代码是:

      use WWW::Scripter;
       
      ...
                 
      my $w = WWW::Scripter->new('agent' => 'myAgent');
      $w->use_plugin('JavaScript');
       
      ...
       
      $w->get($url);
       
      ### WWW::Mechanize automatic cookies = good for now
       
      $w->add_header(Referer => $url);
      $url = $w->document->getElementsByTagName('a')->[0]->href;
      $w->get($url);
       
      ...
       
      ### WWW::Mechanize automatic cookies = NOT good for now
      ### ! need to clear cookie jar here !
       
      ...
       
      $w->add_header(Referer => $url);
      $url = $w->document->getElementsByTagName('a')->[0]->href;
      $w->get($url);

WWW::Mechanize的一个好特性是自动cookie,这在某些方面很好,但有时需要清除cookie。怎样

WWW::Mechanize方法cookie_jar返回一个HTTP::Cookies对象。相关方法实际上被命名为clear

查看文档,难道不能重置cookie jar属性吗?

例如

$w->cookie_jar({});