滤除 cookie
显示现有的 cookie.
In[1]:=
$CookiesOut[1]=
清除 cookie.
In[2]:=
ClearCookies[All];In[3]:=
$CookiesOut[3]=
创建 cookie 函数，只接受存在于当前进程的 cookie，拒绝其他的 cookie. 用 Echo 来报告是接受还是拒绝了 cookie.
In[4]:=
cookieFilter[cookie_Association] :=
If[cookie["ExpirationDate"] === Automatic,
SetCookies[Echo[cookie, "Accepted"]],
Echo[cookie, "Rejected: "]
]In[5]:=
URLRead["amazon.com", CookieFunction -> cookieFilter]»
»
»
»
Out[5]=
In[6]:=
URLRead["user.wolfram.com", CookieFunction -> cookieFilter]»
»
Out[6]=
现在 $Cookies 只含有没有明确过期日期的 cookie.
In[7]:=
$CookiesOut[7]=
