Tcl - Dizionario

Un dizionario è una disposizione per mappare i valori alle chiavi. La sintassi per il dizionario convenzionale è mostrata di seguito:

dict set dictname key value
# or 
dict create dictname key1 value1 key2 value2 .. keyn valuen

Di seguito sono riportati alcuni esempi per la creazione di un dizionario:

#!/usr/bin/tclsh

dict set colours  colour1 red 
puts $colours
dict set colours  colour2 green
puts $colours

set colours [dict create colour1 "black" colour2 "white"]
puts $colours

Quando il codice sopra viene eseguito, produce il seguente risultato:

colour1 red
colour1 red colour2 green
colour1 black colour2 white

Dimensioni di Dict

La sintassi per ottenere la dimensione di dict è mostrata di seguito:

[dict size dictname]

Di seguito è riportato un esempio per la stampa delle dimensioni:

#!/usr/bin/tclsh

set colours [dict create colour1 "black" colour2 "white"]
puts [dict size $colours]

Quando il codice sopra viene eseguito, produce il seguente risultato:

2

Dizionario iteration

Di seguito è mostrata una semplice iterazione del dizionario per la stampa delle chiavi e del valore del dizionario:

#!/usr/bin/tclsh

set colours [dict create colour1 "black" colour2 "white"]
foreach item [dict keys $colours] {
   set value [dict get $colours $item]
   puts $value
}

Quando il codice sopra viene eseguito, produce il seguente risultato:

black
white

Valore per la chiave in Dict

La sintassi per il recupero del valore per la chiave in dict è mostrata di seguito:

[dict get $dictname $keyname]

Di seguito viene fornito un esempio per il recupero del valore per la chiave:

#!/usr/bin/tclsh

set colours [dict create colour1 "black" colour2 "white"]
set value [dict get $colours colour1]
puts $value

Quando il codice sopra viene eseguito, produce il seguente risultato:

black

Tutte le chiavi in ​​Dict

La sintassi per il recupero di tutte le chiavi in ​​dict è mostrata di seguito:

[dict keys $dictname]

Di seguito è mostrato un esempio per la stampa di tutte le chiavi:

#!/usr/bin/tclsh

set colours [dict create colour1 "black" colour2 "white"]
set keys [dict keys $colours]
puts $keys

Quando il codice sopra viene eseguito, produce il seguente risultato:

colour1 colour2

Tutti i valori in Dict

La sintassi per il recupero di tutti i valori in dict è mostrata di seguito:

[dict values $dictname]

Di seguito è riportato un esempio per la stampa di tutti i valori:

#!/usr/bin/tclsh

set colours [dict create colour1 "black" colour2 "white"]
set values [dict values $colours]
puts $values

Quando il codice sopra viene eseguito, produce il seguente risultato:

black white

La chiave esiste in Dict

La sintassi per verificare se una chiave esiste in dict è mostrata di seguito:

[dict exists $dictname $key]

Di seguito è mostrato un esempio per verificare se una chiave esiste in dict:

#!/usr/bin/tclsh

set colours [dict create colour1 "black" colour2 "white"]
set result [dict exists $colours colour1]
puts $result

Quando il codice sopra viene eseguito, produce il seguente risultato:

1