set list1 "This list is grouped with quotes"
  set list2 {This list is grouped with curlies}
  set list3 [list This list is created with list]
  set list4 [split "This,list,is,created,by,splitting,on,commas" ,]

  label .l_string -text "String has [llength $list1] elements"
  label .l_curly -text "Braces has [llength $list2] elements"
  label .l_brace -text "list command has [llength $list3] elements"
  label .l_split -text "join command has [llength $list4] elements"
  
  grid .l_string -column 1 -row 1 
  grid .l_curly  -column 1 -row 2
  grid .l_brace  -column 1 -row 3 
  grid .l_split  -column 1 -row 5

  label .l_string_first -text [lindex $list1 5]
  label .l_curly_first -text [lindex $list2 5]
  label .l_brace_first -text [lindex $list3 5]
  label .l_split_first -text [lindex $list4 5]

  grid .l_string_first -column 2 -row 1 
  grid .l_curly_first  -column 2 -row 2
  grid .l_brace_first  -column 2 -row 3 
  grid .l_split_first  -column 2 -row 5