Correspondances mIRC/TCL

[sismik]

Bonsoir,

Après mes années de scripting mirc, le tcl regorge de problèmes que je galère à résoudre, les masses de doc sont tellement énormes que je m'y perds. C'est pourquoi je fais appel aux codeurs que vous êtes.
Savez vous si des fonctions existent pour remplacer :
- isin opérateur qui permet de vérifier si une chaine fait partit d'une autre chaine.
- $eval($arg)

Merci d'avance de m'aider :)

Ciao

[CrazyCat]

Pour isin, tu peux utiliser string first, et pourquoi pas recréer la fonction:

tclcopier

proc isin {needle haystack} {
   if {[string first $haystack $needle] >= 0} return 1
   return 0
}

Eval existe en tcl, mais sans le principe d'itérations qui existe dans mirc.