Expliquation tcl ;)

[CrazyCat]

De plus, des noms de procédure ne devraient pas comporter de caractères spéciaux (comme le !), hormis les ":".
Tu peux très bien faire:

tclcopier

bind pubm - !admin tournoi:getadmin
 
proc tournoi:getadmin { nick uhost handle chan text } {
   set args [split $text]
   set key [stripcodes abcgru [lindex $args 0]]
   set key [string range $key 1 end]
   if { $key == "admin" } {
      putserv "PRIVMSG $chan :L'admin du tournois est : $::tournoi(admin)"
   }
   return 0;
}

Pour information, Cyril utilise pubm plutôt que pub pour éviter le souci des personnes qui écrivent en couleur, le premier caractère de la ligne étant alors le code couleur (et non pas le "!")