package require http

#Reads specified URL and returns content
proc geturltext {url} {
	set fd [http::geturl $url]
	set text [http::data $fd]
	http::cleanup $fd
	return text
}