(Tcl) Parse a URL into its Component Parts
Demonstrates how to parse a URL into it's component parts.
load ./chilkat.dll
set url [new_CkUrl]
set urlStr "https://www.amazon.com/Anarchy-State-Utopia-Robert-Nozick/dp/0465051006/ref=sr_1_1?s=books&ie=UTF8&qid=1430344305&sr=1-1&keywords=nozick#frag123"
set success [CkUrl_ParseUrl $url $urlStr]
# Assume success..
puts "URL: $urlStr"
puts "Host: [CkUrl_host $url]"
puts "Port: [CkUrl_get_Port $url]"
puts "HostType: [CkUrl_hostType $url]"
puts "Ssl: [CkUrl_get_Ssl $url]"
puts "Path: [CkUrl_path $url]"
puts "Query: [CkUrl_query $url]"
puts "Frag: [CkUrl_frag $url]"
puts "----"
set urlStr "http://matt:secret@www.chilkatsoft.com:8080/somepath.asp?test=123&size=2"
set success [CkUrl_ParseUrl $url $urlStr]
# Assume success..
puts "URL: $urlStr"
puts "Host: [CkUrl_host $url]"
puts "Port: [CkUrl_get_Port $url]"
puts "HostType: [CkUrl_hostType $url]"
puts "Ssl: [CkUrl_get_Ssl $url]"
puts "Login: [CkUrl_login $url]"
puts "Password: [CkUrl_password $url]"
puts "Path: [CkUrl_path $url]"
puts "Query: [CkUrl_query $url]"
puts "Frag: [CkUrl_frag $url]"
delete_CkUrl $url
|
