Posted to tcl by net vs http at Wed Oct 11 02:35:52 GMT 2017view pretty
::tcl::tm::path add [pwd] package require net package require http proc t(net) {url} { set s [net call $url] $s wait $s response data } proc t(http) {url} { http::data [http::geturl $url] } set url http://www.google.com/ #puts [list [t(http) $url]] #puts [list [t(net) $url]] #exit puts [time {t(http) $url} 10] puts [time {t(net) $url} 10]