Tcl
Tcl
Remove a Request Header from a REST Request
See more REST Examples
Demonstrates Rest.RemoveHeader, which removes all request headers matching the supplied name.
Background. Removing a header is useful when reusing a Rest object across requests that require different header sets.
Chilkat Tcl Downloads
load ./chilkat.dll
set success 0
set rest [new_CkRest]
# Connect to the REST server. The 3rd argument enables TLS (use 1 for HTTPS on port 443),
# and the 4th enables automatic reconnection if the connection is dropped between requests.
set bTls 1
set bAutoReconnect 1
set success [CkRest_Connect $rest "example.com" 443 $bTls $bAutoReconnect]
if {$success == 0} then {
puts [CkRest_lastErrorText $rest]
delete_CkRest $rest
exit
}
CkRest_AddHeader $rest "Accept" "application/json"
CkRest_AddHeader $rest "X-Custom-Header" "example-value"
# Remove a previously added request header by name.
CkRest_RemoveHeader $rest "X-Custom-Header"
set responseText [CkRest_fullRequestNoBody $rest "GET" "/api/data"]
if {[CkRest_get_LastMethodSuccess $rest] == 0} then {
puts [CkRest_lastErrorText $rest]
delete_CkRest $rest
exit
}
puts "$responseText"
delete_CkRest $rest