set ncode [http::ncode $egismeteo_tok] set code [http::code $egismeteo_tok] if {$ncode != "200"} {putserv "PRIVMSG $chan :\00304HTTP-Error\003: $code"; return}