set glpubbind !test

bind pub -|- $glpubbind pub_test

proc pub_test {nick uhost hand chan arg} {
package require http
set myurl http://www.myurl.com/test.php
set token [::http::geturl $myurl]
set text [::http::data $token]
::http::cleanup $token
putquick "PRIVMSG $chan :$text"
}
