regexp

[StaleJoke]

Code: Select all

set r [regexp -nocase -all {$t1|$t2} $arg]

Doesn't work. Any corrections need to be done ?

[Sir_Fz]

$ has special meaning inside {} in regexp. Try "" instead {}.

[DragnLord]

Variables are not expanded inside of curly braces, you need to use double quotes as Sir_Fz suggested when using variables for matchin with regexp.

[avilon]

Code: Select all

set RE {$t1|$t2}

set r [regexp -nocase -all -- [subst -nocommands -nobackslashes $RE] $arg]

[StaleJoke]

Done.

Code: Select all

set r [regexp -nocase -all -- [subst -nocommands -nobackslashes $RE] $arg]

But problem happens when it the var $RE is ) or a (
The error it spews out is

Tcl error [rep_fld]: couldn't compile regular expression pattern: parentheses () not balanced

Any suggestions ?

[Sir_Fz]

Code: Select all

set RE [string map {( \\( ) \\)} $RE]

[StaleJoke]

On the same lines, if the bot encounters an astrix * as part of the word ( e.g. word* ) it gives me the error as:

Tcl error [repact_fld]: couldn't compile regular expression pattern: quantifier operand invalid

[Sir_Fz]

Code: Select all

set RE [string map {( \\( ) \\) * \\*} $RE]

You might want to add more special characters to this list.