Code: Select all
set r [regexp -nocase -all -- [subst -nocommands -nobackslashes $RE] $arg]
Code: Select all
set r [regexp -nocase -all {$t1|$t2} $arg]
Code: Select all
proc sother {} {
catch {exec "./home/otherbot/scripts/botchk >/dev/null 2>&1"}
}