滤除 cookie
显示现有的 cookie.
In[1]:=

$Cookies
Out[1]=

清除 cookie.
In[2]:=

ClearCookies[All];
In[3]:=

$Cookies
Out[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]:=

$Cookies
Out[7]=
