html parser

2010-11-30T10:57:14-04:00

The above script didn't work because of the page it was getting data from, i've changed the source now and it is working but I'm unable to make it loop through to the next line of text. I'll also include a sample of the html code i'm trying to parse.

Code:

set rssfeed "http://www.fred.co.uk"set trigger "!latest"set channel "#12321"if {![info exists egghttp(version)]} {  putlog "egghttp.tcl was NOT successfully loaded."  putlog "egghttp_example.tcl has not been loaded as a result."} else {  proc your_callbackproc {sock} {    global rssfeed channel    set headers [egghttp:headers $sock]    set body [egghttp:data $sock]    regexp {">(.*?)
} $body - date    puthelp "PRIVMSG $channel : $date"    set xml { $body }      foreach line [split $xml "\n"] {    regexp {(.*?)(.*?)} $body - time1 game1    puthelp "PRIVMSG $channel : $time1 $game1"   }  }  bind pub -|* $trigger top:trigger  proc top:trigger {nick host hand chan text} {    global rssfeed    set sock [egghttp:geturl $rssfeed your_callbackproc]    return 1  } }

HTML that I need to parse

Code:

Barclays Premier League fixtures
4 Dec 2010
zzz1 xxx1
zzz2 xxx2
zzz3 xxx3
zzz4 xxx4
zzz5 xxx5
zzz6 xxx6
zzz7 xxx7

5 Dec 2010
zzz8 xxx8
zzz9 xxx9

6 Dec 2010
zzz10 xxx10

11 Dec 2010
zzz11 xxx11
zzz12 xxx12

zzz1	xxx1

zzz2	xxx2

zzz3	xxx3

zzz4	xxx4

zzz5	xxx5

zzz6	xxx6

zzz7	xxx7

zzz8	xxx8

zzz9	xxx9

zzz10	xxx10

zzz11	xxx11

zzz12	xxx12

The only outcome will now be

Code:

[02:43:56] <@nick> !latest[02:44:01] <+bot> 4 Dec 2010[02:44:03] <+bot> zzz1 xxx1

But I would like

Code:

[02:43:56] <@nick> !latest[02:44:01] <+bot> 4 Dec 2010[02:44:03] <+bot> zzz1 xxx1[02:44:03] <+bot> zzz2 xxx2[02:44:03] <+bot> zzz3 xxx3[02:44:03] <+bot> zzz4 xxx4[02:44:03] <+bot> zzz5 xxx5etc etc etc

Thanks in davance!

Statistics: Posted by romprod — Tue Nov 30, 2010 10:57 am

html parser

2010-11-29T14:45:00-04:00

Trying create a basic script to rip info from a url and spit it out to a channel but for some reason it aint working. Can anyone point out the obvious to me please as it's driving me crazy!

Code:

# Configset url "http://feed43.com/3222412860174114.xml"set dcctrigger "test"# End of configif {![info exists egghttp(version)]} {  putlog "egghttp.tcl was NOT successfully loaded."  putlog "egghttp_example.tcl has not been loaded as a result."} else {  proc your_callbackproc {sock} {    global url    set headers [egghttp:headers $sock]    set body [egghttp:data $sock]      regsub -all "\n" $body "" body    regsub -all -nocase {
} $body "
\n" body    regexp {(.*)
} $body - team    putlog "Team: $team"  }  bind dcc o|o $dcctrigger our:dcctrigger  proc our:dcctrigger {hand idx text} {    global url     set sock [egghttp:geturl $url your_callbackproc]    return 1  }    putlog "egghttp_example.tcl has been successfully loaded."}

Statistics: Posted by romprod — Mon Nov 29, 2010 2:45 pm

egghelp/eggheads community

html parser

(.*?)

Barclays Premier League fixtures

4 Dec 2010

5 Dec 2010

6 Dec 2010

11 Dec 2010

html parser