Code: Select all
proc your_callbackproc {sock} {
global url nick2msg
putlog "Getting scores on the request of $nick2msg"
set headers [egghttp:headers $sock]
set body [egghttp:data $sock]
regsub -all "\n" $body "" body
regsub -all -nocase {<br>} $body "<br>\n" body
regsub -all {<b>} $body "\n\002" body
regsub -all {</b>} $body "\002" body
regsub -all {Cricinfo} $body "\00304#Cricket\003 @ \00304Undernet\003" body
regsub -all {at } $body " at " body
regsub -all {World Cup Warm-up Matches} $body "\00304,01World Cup Warm-up Matches\003" body
regsub -all {<p class="blueBackHeading">} $body "\n\00300,12" body
regsub -all {</p>} $body "\003\n" body
regsub -all { } $body "" body
regsub -all {This page automatically refreshes every 90 seconds.} $body "" body
regsub -all {Scorecard} $body "" body
regsub -all {Desktop scorecard} $body "" body
regsub -all {Bulletin} $body "" body
regsub -all {3D Animation} $body "" body
regsub -all {Match home} $body "" body
regsub -all {\|} $body {} body
regsub -all {<.+?>} $body "" body
[msgnick $body]
}
Code: Select all
[08:20] <Cricket`-> #Cricket @ Undernet - Desktop Scoreboard function init(){ if(parent.adjustIFrameSize) parent.adjustIFrameSize(window); //alert(parent.adjustIFrameSize);}//window.onload = init;
[08:20] <Cricket`-> Current time: 03:20 GMT, Fri Apr 04, 2008
Code: Select all
set url "http://content-pak.cricinfo.com/ci/engine/current/match/scores/liveframe.html"
your help will be appreciated.
Thanks and peace
iamdeath