egghelp/eggheads community

Message Auto-Reply

2003-07-15T12:00:46-04:00

not like that silly.. like this: .tcl string match *foo* foo bar .. anyway, it realy dosen't matter.. I'm used to use the " to make the code look better and avoid any errors.

How would the code given by wile ever get to such a construction?

There are two string variables $targchan and $chan and they are compared to each other.

For sure, a command will fail if you don't use the proper syntax.

Statistics: Posted by egghead — Tue Jul 15, 2003 12:00 pm

Message Auto-Reply

2003-07-15T11:54:30-04:00

not like that silly.. like this: .tcl string match *foo* foo bar .. anyway, it realy dosen't matter.. I'm used to use the " to make the code look better and avoid any errors.

Statistics: Posted by caesar — Tue Jul 15, 2003 11:54 am

Message Auto-Reply

2003-07-15T11:27:24-04:00

try with two words like: foo bar .. and you will see a notable difference. if is one word only then is working, else.. see for yourself.

First, I would assume that a channel name is a single word. But, if you insist...

tclsh8.3
% set targchan "foo bar"
foo bar
% set chan #foobar
#foobar
% string match *$targchan* $chan
0
% puts *$targchan*
*foo bar*

Now that I did see it for myself (as you asked), I wonder what your point is?

Statistics: Posted by egghead — Tue Jul 15, 2003 11:27 am

Message Auto-Reply

2003-07-15T10:59:31-04:00

try with two words like: foo bar .. and you will see a notable difference. if is one word only then is working, else.. see for yourself.

Statistics: Posted by caesar — Tue Jul 15, 2003 10:59 am

Message Auto-Reply

2003-07-14T17:05:36-04:00

Uhmm. yes, mea culpa. Btw, that *string match* thing should have some " in it..

tclsh8.3
% set targchan foo
foo
% set chan #foobar
#foobar
% string match *$targchan* $chan
1
% puts *$targchan*
*foo*

Statistics: Posted by egghead — Mon Jul 14, 2003 5:05 pm

Re: Message Auto-Reply

2003-07-14T18:51:59-04:00

bot will reply for a massage at the channel or nick
but i have an error which is

Tcl error [replychan]: wrong # args: should be "string option arg ?arg ...?"

here is the source problem
proc replychan {nick uhost hand chan rest} {
global botnick repchan
foreach targchan $repchan {if {[string match *[string tolower $targchan]* [string tolower $chan]]} {append reps "$chan $rest" ; replyuser $nick $uhost $hand $reps ; return 0}}
}

It feels like you are breaking the [string match] command across lines.
So, besides the comments/suggestions given above, make sure that you don't break the code across lines. Newlines, do matter.

WRONG:

Code:

if { [string match *$targchan* \n$chan]} { .... }

the \n indicates a newline

RIGHT:

Code:

if { [string match *$targchan* $chan] } { \n... }

Example of what may go wrong:

Code:

if { [string matchhello world ]} {   puts "match"} {   puts "no match"}

will result in:

wrong # args: should be "string match ?-nocase? pattern string"
while executing
"string match "
(file "test.tcl" line 1)

Another example

Code:

if { [string match hello world ]} {   puts "match"} {   puts "no match"}

will result in:

wrong # args: should be "string option arg ?arg ...?"
while executing
"string "
(file "test.tcl" line 1)

Statistics: Posted by egghead — Mon Jul 14, 2003 5:01 pm

Message Auto-Reply

2003-07-14T16:09:09-04:00

Uhmm. yes, mea culpa. Btw, that *string match* thing should have some " in it..

Statistics: Posted by caesar — Mon Jul 14, 2003 4:09 pm

Message Auto-Reply

2003-07-14T16:03:49-04:00

I'm sure caesar meant the replyuser proc, because replychan is already posted :)

Statistics: Posted by stdragon — Mon Jul 14, 2003 4:03 pm

Message Auto-Reply

2003-07-14T14:05:17-04:00

Please do paste the code of the *replychan* proc.

Statistics: Posted by caesar — Mon Jul 14, 2003 2:05 pm

Message Auto-Reply

2003-07-14T13:27:45-04:00

hello mr. ceasar i tried your advice theres new error such as
[17:31] Tcl error [replychan]: wrong # args: should be "string match ?-nocase? pattern string"

Statistics: Posted by Guest — Mon Jul 14, 2003 1:27 pm

Message Auto-Reply

2003-07-13T14:53:50-04:00

I don't think the error is in that proc. It's probably in your "replyuser" function.

Statistics: Posted by stdragon — Sun Jul 13, 2003 2:53 pm

Message Auto-Reply

2003-07-13T13:16:38-04:00

Place the *[string tolower $targchan]* in two "'s like: "*[string tolower $targchan]*" if you use *wildcards*

Statistics: Posted by caesar — Sun Jul 13, 2003 1:16 pm

Message Auto-Reply

2003-07-13T13:00:48-04:00

Please give a example of sentence that causes an error.

Statistics: Posted by Dereckson — Sun Jul 13, 2003 1:00 pm

Message Auto-Reply

2003-07-13T12:38:49-04:00

bot will reply for a massage at the channel or nick
but i have an error which is

Tcl error [replychan]: wrong # args: should be "string option arg ?arg ...?"

here is the source problem
proc replychan {nick uhost hand chan rest} {
global botnick repchan
foreach targchan $repchan {if {[string match *[string tolower $targchan]* [string tolower $chan]]} {append reps "$chan $rest" ; replyuser $nick $uhost $hand $reps ; return 0}}
}

Statistics: Posted by Guest — Sun Jul 13, 2003 12:38 pm