RosettaCodeData/Task/Enumerations/Tcl/enumerations-2.tcl

7 lines
122 B
Tcl

enumerate fruit {apple blueberry cherry date elderberry}
fruit: date
# ==> prints "3"
fruit@ 2
# ==> prints "cherry"