This is my first try on a tcl script and i got a little problem..
I use the following code:
Code: Select all
regexp -nocase -line {<b>(.*)</b>((.*))<b>Party</b>(.*)<br><font color="#707070">(.*)</font><br>} $data match 1 2 3 4
putserv "PRIVMSG $chan $1 $2"
If i add a line with:
Code: Select all
putserv "PRIVMSG $chan $2"
Therefor i simply ask, what have i missed out on?
thanks in advance,
Tore