package require http

proc test {token} {
    puts called
    dosomethingbad
    return
}

http::geturl "http://news.bbc.co.uk/" -command test
vwait forever