egghelp/eggheads community

dollar tcl, small error

2008-04-09T19:16:23-04:00

thanks, my fault.

Statistics: Posted by testebr — Wed Apr 09, 2008 7:16 pm

dollar tcl, small error

2008-04-09T18:57:56-04:00

Perhaps you meant

Code:

regexp {([0-9],[0-9]{3}).*([0-9],[0-9]{3})} $X Z AZ BZ

as there are only 3 digits after the comma and not 4.

Statistics: Posted by Sir_Fz — Wed Apr 09, 2008 6:57 pm

dollar tcl, small error

2008-04-09T18:30:35-04:00

Code:

bind pub - !dollar dollarpackage require http 2.3proc dollar {n u h c a} {set ID [::http::geturl http://www.bc.gov.br/htms/infecon/taxas/taxas.htm -timeout 10000]set X [split [::http::data $ID] \n]::http::cleanup $IDregexp {([0-9],[0-9]{4}).*([0-9],[0-9]{4})} $X Z AZ BZputserv "PRIVMSG $c :Taxa de compra $AZ / Taxa de venda $BZ"}

Tcl error [dollar]: can't read "AZ": no such variable

How to fix it?

Statistics: Posted by testebr — Wed Apr 09, 2008 6:30 pm