2017-10-31

TCL, array 陣列

Example Code
array set familyName {
    papa Agent7
    momo Agent8
    son Agent9
}



Check ARRAY exist (1: true - 0: false)
# array exists family
# 1


List ARRAY variable name
# array name family
# sonName momoName papaName


Get ARRAY variable content
# array get family
# sonName Agent9 momoName Agent8 papaName Agent7


Resurt
# puts $familyName(papa)
# AgentPAPA

# puts $familyName(momo)
# AgentMOMO