egghelp/eggheads community

Help with egghelp.tcl

2005-12-20T23:21:08-04:00

nope, it's bug in your script or/and your logic

Statistics: Posted by demond — Tue Dec 20, 2005 11:21 pm

Help with egghelp.tcl

2005-12-20T12:02:34-04:00

I get exactly the same result without the "-command".
Could this be a bug from the http package?
PS: sorry the for quote instead of code; i just fixed it

Statistics: Posted by ryal — Tue Dec 20, 2005 12:02 pm

Help with egghelp.tcl

2005-12-16T23:26:53-04:00

try using it in the simpler, blocking form first - i.e. without -command switch

and use

Code:

 tag when posting code, not [quote]

Statistics: Posted by demond — Fri Dec 16, 2005 11:26 pm

Help with egghelp.tcl

2005-12-20T12:03:09-04:00

Thx for the tip, didnt know there was a built in package.
Anyway, i still get the same error (that is http::data returns an empty string, no url data). Heres the new code:

Code:

proc parse_proc { nick uhost handle arg } {global sockset url "http://www.google.com"set target $nickset sock [::http::geturl $url -command [list parseinfo $target $url] -timeout 60]puthelp "PRIVMSG $target :$url"}proc parseinfo {target url sock} {set body [::http::data $sock]::http::cleanup $sockset body2 [string range $body 0 [string first $body "\n"]]puthelp "PRIVMSG $target :hello"puthelp "PRIVMSG $target :$body hello2"}

It displays the url, "hello" and then "hello2" with nothing in front of it.
Any ideas?

PS: of course the timer wasnt 10' at first i just wanted to know if it could be a timer pb so i put an extra large.
Thanks for your help guys!

Statistics: Posted by ryal — Fri Dec 16, 2005 6:08 am

Help with egghelp.tcl

2005-12-16T03:09:01-04:00

egghttp is outdated, do not use it

use Tcl's built-in http package instead

Statistics: Posted by demond — Fri Dec 16, 2005 3:09 am

Help with egghelp.tcl

2005-12-15T20:21:42-04:00

3 things:
- try using a shorter timeout than 10min
- try using the header line "Connection: close"
- Try passing only the first line to puthelp via [string range $body 0 [string first $body "\n"]]. That saves your bot getting various errors from IRC Server and most likely getting spammed out (if it isnt trimmed to 510 bytes anyway)

Btw. headers also contain about 5-10 lines depending on HTTP server.

Statistics: Posted by De Kus — Thu Dec 15, 2005 8:21 pm

Help with egghelp.tcl

2005-12-15T13:17:48-04:00

Hi !
Im trying to parse the content of a webpage but it doesnt work (it does tho with some webpages but not with www.google.com).
Heres the code i use:

proc parse_proc { nick uhost handle arg } {
global mychan sock

set d [date:offset [clock seconds] %m%d%y]
set url "http://www.google.com"
set target $nick
set sock [egghttp:geturl $url [list parseinfo $target $url] -timeout 600]
puthelp "PRIVMSG $target :$url"
}

proc parseinfo {target url sock} {
set headers [egghttp:headers $sock]
set body [egghttp:data $sock]
puthelp "PRIVMSG $target :hello"
puthelp "PRIVMSG $target :$headers"
puthelp "PRIVMSG $target :$body"
}

It displays the right url, "hello" and then nothing. I know body is a big variable but it should display the first line (which it does for some websites, but not with google). Of course i loaded egghelp.tcl in my *.conf and it loads alright.
What did i do wrong? i do believe the error stands in the way i call egghttp:geturl but i dont know how to fix it

Statistics: Posted by ryal — Thu Dec 15, 2005 1:17 pm