Фильтровка куки
Покажите Ваш текущий список куки.
In[1]:=
![Click for copyable input](assets.ru/filter-cookies/In_87.png)
$Cookies
Out[1]=
![](assets.ru/filter-cookies/O_79.png)
Очистите список куки.
In[2]:=
![Click for copyable input](assets.ru/filter-cookies/In_88.png)
ClearCookies[All];
In[3]:=
![Click for copyable input](assets.ru/filter-cookies/In_89.png)
$Cookies
Out[3]=
![](assets.ru/filter-cookies/O_80.png)
Создайте функцию куки, которая принимает только куки, существующие в текущем сеансе, и отвергает все остальные. Используйте Echo для сообщения о том, какие куки были приняты, а какие - отвергнуты.
In[4]:=
![Click for copyable input](assets.ru/filter-cookies/In_90.png)
cookieFilter[cookie_Association] :=
If[cookie["ExpirationDate"] === Automatic,
SetCookies[Echo[cookie, "Accepted"]],
Echo[cookie, "Rejected: "]
]
In[5]:=
![Click for copyable input](assets.ru/filter-cookies/In_91.png)
URLRead["amazon.com", CookieFunction -> cookieFilter]
»
![](assets.ru/filter-cookies/O_81.png)
»
![](assets.ru/filter-cookies/O_82.png)
»
![](assets.ru/filter-cookies/O_83.png)
»
![](assets.ru/filter-cookies/O_84.png)
Out[5]=
![](assets.ru/filter-cookies/O_85.png)
In[6]:=
![Click for copyable input](assets.ru/filter-cookies/In_92.png)
URLRead["user.wolfram.com", CookieFunction -> cookieFilter]
»
![](assets.ru/filter-cookies/O_86.png)
»
![](assets.ru/filter-cookies/O_87.png)
Out[6]=
![](assets.ru/filter-cookies/O_88.png)
Теперь $Cookies содержит только куки без явно указанной даты истечения.
In[7]:=
![Click for copyable input](assets.ru/filter-cookies/In_93.png)
$Cookies
Out[7]=
![](assets.ru/filter-cookies/O_89.png)