foreach line [split [::http::data $token] \n] {
if [string match "*Registered Users*" $line] {
#### i don't know how to recover the names of Registered Users???
if [string match "*In total there are 5 users online :: 2 Registered, 2 Hidden and 1 Guest*" $line] {
regexp -- {In total there are <b>(.+)</b> users online :: <b>(.+)</b> Registered, <b>(.+)</b> Hidden and <b>(.+)</b> Guest} $line - user util enr inv
I have a error message: can't read "user": no such variable .
Last question: How to calculate the number of post on a forum? It's possible?
regexp -- {In total there are <b>(.+)</b> users online :: <b>(.+)</b> Registered, <b>(.+)</b> Hidden and <b>(.+)</b> Guest} $line match util enr inv nad
Another question, I does not succeed in writing the users who are on line
foreach line [split [::http::data $token] \n] {
if [string match "*Registered Users*" $line] {
#How to make to have all the registered users who are in lines?