egghelp/eggheads community

johne

per speechles himself in twitter.tcl on mine ::http::register https 443 [list ::tls::socket -request 1 -require 0] change that to ::http::register https 443 [list ::tls::socket -tls1 1] make sure twitter.tcl is the last script sourced otherwise it might break the http::register if another script doe...

johne

worked great! thx!

johne

i'm trying to pull [dict get $data watched show title] from the data below after using json2dict. what am I missing to pull the watched data via dict or is there a better way?

http://pastebin.com/AEk3feYz

johne

<speechl3s> johne --v
<speechl3s> foreach entry [dict get $json data game plays play] {
<speechl3s> dict with entry {
<speechl3s> puts "desc=$desc"
<speechl3s> }
<speechl3s> }

johne

after converting a json feed to tcl dict i'm not able to get the values I need, is this a problem with the json format or something im doing wrong? http://pastebin.com/19mRWFKZ post json2dict to get the value im using dict get $json data game plays play which returns {sweater 25 hs 0 aoi {8462042 84...

johne

ahh :/ thanks for your explanation.

johne

i have a join bind which calls a proc with the usual n u h c args, when the following line is performed, i get an error utimer $::timer1 [list if {[onchan $n $c] && ![isop $n $c]} { putserv "PRIVMSG $c :[string map -nocase "%n $n" [random $::line1]]" }] can't read "n...

johne

okay, i figured it out..crazy stuff but 1.6.17 experiences this behavior, i upgraded to 1.6.19 and both pub and pubm work, and i tested on 1.6.18 and got the same results.

johne

I have several scripts running with different binds and I am trying to enable flood/repeat protection in an additional script but it will not work when the text is the existing binds. If I type hello hello hello the proc will run but when I type .command .command .command the initial bind pub works ...

johne

temps are now not displaying *curses wunderground*

johne

some more working examples would be greatly appreciated

johne

ok now that that works (there was a space at the beginning of the text line that was giving me problems)...it only outputs the lines of text that are defined by the regexp if {[regexp {^\x020[3]} $e] == 1} { now i need to work on getting the format correct id like to take this: 3<left>501 NEW JERSEY...

johne

im not sure if im going in the right direction with this, but ive managed to code something that gives me 0 output, but no errors.

Code: Select all

   foreach e [split [::http::data $x] \n] {
     if {[regexp {^3} $e] == 1} {
       puthelp "privmsg $c :$e"

johne

the lines that im wanting to strip out of the text file look like this 3<left>501 NEW JERSEY <right> 96 <left>502 ORLANDO <right> 85 <center><h> FINAL</h> 3<left>503 LA CLIPPERS <right> 75 <left>504 INDIANA <right> 97 <center><h> FINAL</h> 3<left>505 GOLDEN STATE <right>1...

johne

ok, ill start looking into that, but from reading in the forums, if i want to parse html, im going to need to use regexp anyways correct?

egghelp/eggheads community

Search found 29 matches

json2dict help

json to nested dict

Re: utimer with an if statement

utimer with an if statement

pubm priority/conflict