• # La réponse est "dict"

    Posté par . En réponse au message TCL / Expect Tableau bizarre. Évalué à 1.

    Bonjour,

    Voici une fonction d'exemple qui te donne la syntaxe pour extraire les informations:

    proc get_it {table idx key} {
 return [dict get [lindex [lindex $table $idx] 0] $key]
}
# Et un exemple pour l'utiliser:
for {set i 0} {$i < [llength $mytable]} {incr i} {
 puts "($i) -> ([get_it $mytable $i name] = [get_it $mytable $i nodeaddr])"
}

    Y'aurait probablement moyen de faire plus adapté selon ce que tu veux faire tes données.
    Sinon je n'ai pas compris ta remarque ci-dessus sur les retours à la ligne et les liste. En TCL le parseur est très simple, et la pratique générale est d'utiliser les accolades pour les listes avec les espaces/tabs/CR entre les éléments, par exemples:

    set une_liste {element1 elm2 elm3}

    mais aussi:

    set une_autre_liste {
 un_element
 "un deuxieme element" {un troisieme element}
 le_quatrieme
}

    TCL est simple, mais il possède un défaut: il faut le connaitre pour l'apprécier. Comme tous les autres langages en fait. Après, il est vrai qu'il est passé de mode, mais ça, ça arrivera à tous les langages.