Errorhandling using the http package

2003-04-27T07:52:49-04:00

I see it handling errors within your code... what's the question again?
As far as catching TCL errors, use catch -> http://tcl.activestate.com/man/tcl8.3/TclCmd/catch.htm.

Statistics: Posted by MC_8 — Sun Apr 27, 2003 7:52 am

Errorhandling using the http package

2003-02-04T09:09:34-04:00

Hi there,

I wrote a little script that reads the info about a stream from a website. It works fine, but I would like to add some errorhandling. Maybe the Site is down, my eggdrop only writes some error messages to the partyline. Maybe anyone could help me to do this?

Here`s the source so far:

Code:

############ Configuration #############set streamurl "http://rootbash.com:25000"########################################bind pub *|* "!listeners" pub:listenerspackage require httpproc pub:listeners {nick host handle channel arg} {global streamurlset streamsource [http::geturl $streamurl]upvar #0 $streamsource streaminfoif {[lindex $streaminfo(http) 2] != "OK"} {putserv "PRIVMSG $channel :Sorry, an error occured!"} else {set streamdata [http::data $streamsource]set streamkbps "0"regexp {^.*Stream Status: Stream is up at (.*) kbps with (.*) of (.*) listeners \((.*) unique\).*} $streamdata streamdata streamkbps streamlisteners streammaxlisteners streamuniquelistenersif {$streamkbps == "0"} {putserv "PRIVMSG $channel :Sorry, the stream is currently offline!"} else {putserv "PRIVMSG $channel :The stream is online at $streamkbps kbps with $streamlisteners/$streammaxlisteners listeners. ($streamuniquelisteners unique)"}}}putlog "LOADED: Stream v0.1"

Statistics: Posted by ProXy — Tue Feb 04, 2003 9:09 am

egghelp/eggheads community

Errorhandling using the http package

Errorhandling using the http package