(Tcl) Example: Http.ClearInMemoryCookies method

Demonstrates how to call the ClearInMemoryCookies method.

Note: This example requires Chilkat v11.1.0 or greater.

Chilkat Tcl Extension Downloads Chilkat Tcl Extension Downloads

load ./chilkat.dll

set http [new_CkHttp]

# Save received cookies to an in-memory cache.
CkHttp_put_CookieDir $http "memory"
CkHttp_put_SaveCookies $http 1

# Indicate that saved cookies should be sent on subsequent requests (where the cookie's attributes match the request)
CkHttp_put_SendCookies $http 1

set html [CkHttp_quickGetStr $http "https://www.paypal.com/"]

# Examine the cookies cached for the domain paypal.com
set xmlStr [CkHttp_getCookieXml $http "paypal.com"]
puts "$xmlStr"

# Sample output:
# <?xml version="1.0" encoding="utf-8"?>
# <cookies>
#     <cookie key="/,/,$x-enc" v="0" maxAge="1800">
#         <x-enc>URI_ENCODING</x-enc>
#     </cookie>
#     <cookie key=".paypal.com,/,LANG" v="0" expire="Fri, 15 Aug 2025 23:42:44 GMT" maxAge="31556000" secure="yes">
#         <LANG>en_US%3BUS</LANG>
#     </cookie>
#     <cookie key="paypal.com,/,ts" v="0" expire="Mon, 14 Aug 2028 14:56:50 GMT" secure="yes">
#         <ts>vreXpYrS%3D1848964208%26vteXpYrS%3D1755271608%26vr%3Dae3bc3371987669703182e1efffffffe%26vt%3Dae3bc337198369703182e1efffffffd%26vtyp%3Dnew</ts>
#     </cookie>
#     <cookie key="paypal.com,/,ts_c" v="0" expire="Mon, 14 Aug 2028 14:56:50 GMT" secure="yes">
#         <ts_c>vr%3Dae3bc3371987365703182e1efffffffe%26vt%3Dae3bc337198759703182e1efffffffd</ts_c>
#     </cookie>
# </cookies>

# Clear the in-memory cookies.
CkHttp_ClearInMemoryCookies $http

# The cached cookies should not be present.
set xmlStr [CkHttp_getCookieXml $http "paypal.com"]
puts "After calling ClearInMemoryCookies..."
puts "$xmlStr"
puts "----"

delete_CkHttp $http