PerlでWWW :: Scripterモジュールを使って明示的にクッキーをクリアするには？

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の良い機能の一つは、いくつかの点で良いです自動クッキー、ですが、時々クッキーをクリアする必要があります。どうやって？

Answer 1

HTTP::Cookiesオブジェクトを返すcookie_jarWWW::Mechanize方法。関連する方法は、実際にはclearと呼ばれています。

Answer 2

Looking at the documentation、あなたは単にクッキーのjar属性をリセットできませんか？

$w->cookie_jar({});