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

Question

简单的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的一个好特性是automatic ，它在某些方面很好，但有时需要清除cookies。多么?

Answer 1

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

Answer 2

查看文档，你就不能重新设置cookie jar属性吗？

例如：

$w->cookie_jar({});