Home Accessibility Courses Twitter The Mouth Facebook Resources Site Map About Us Contact
 
For 2021 - online Python 3 training - see ((here)).

Our plans were to retire in summer 2020 and see the world, but Coronavirus has lead us into a lot of lockdown programming in Python 3 and PHP 7.
We can now offer tailored online training - small groups, real tutors - works really well for groups of 4 to 14 delegates. Anywhere in the world; course language English.

Please ask about private 'maintenance' training for Python 2, Tcl, Perl, PHP, Lua, etc.
Lists in Tcl - fundamentals in a commented source code example

When I'm writing code demonstrations during class, they usually start off tidy and then get a bit scruffy as I add things in to answer delegate questions. For once last week, a Tcl list demonstration didn't get too untidy, so I give it you here with comments about what each few lines does.

  # different ways of setting up a list
  # (each of these contains three members)
  
  set party "{Ann Marie} Brenda Charles"
  set party "\"Ann Marie\" Brenda Charles"
  set party {"Ann Marie" Brenda Charles}
  set party "Ann\\ Marie Brenda Charles"
  set party {Ann\ Marie Brenda Charles}
  set party [list "Ann Marie" Brucella Charlie]
  
  # Append adds a string (so no space)
  # but lappend adds a list member (so spaced and protected)
  lappend party Brown
  lappend party Douggie
  
  puts $party
  # That prints:
  # {Ann Marie} Brucella CharlieBrown Douggie
  
  # How long is the "party" variable?
  puts [string length $party]
  puts [llength $party]
  # It's one list. Or a list with 4 indexed members. Or a string of 42 characters
  
  # What's the first item?
  set first [lindex $party 0]
  puts $first
  
  # What's the last item?
  set last [lindex $party [expr [llength $party] -1 ]]
  puts $last
  # surely there must be an easier way of doing that!
  set last [lindex $party end]
  puts $last
  
  # Here we are looping through each item of the list
  #[83] •[9a] in this example, we do NOT want to keep track of the position number
  foreach person $party {
    puts "Invite $person to the party"
    }
  
  # Here we are looping through each item of the list
  #[83] •[9a] in this example, we DO want to keep track of the position number
  for {set count 0} {$count < [llength $party]} {incr count} {
    set name [lindex $party $count]
    puts "I expect person $count will come (that's $name )"
    }


You can see sample output on the end of the code [here], and of course you can come on one of our courses to learn it yourself from me!
(written 2013-11-16, updated 2013-11-19)

 
Associated topics are indexed as below, or enter http://melksh.am/nnnn for individual articles
T206 - Tcl/Tk - Lists
  [144] Tcl sandwich - lists in Tcl - (2004-12-08)
  [463] Splitting the difference - (2005-10-13)
  [781] Tcl - lappend v concat - (2006-06-27)
  [1282] Stringing together Tcl scripts - (2007-07-29)
  [1283] Generating traffic for network testing - (2007-07-29)
  [1334] Stable sorting - Tcl, Perl and others - (2007-09-06)
  [1402] Tcl - append v lappend v concat - (2007-10-23)
  [1405] Sorting in Tcl - lists and arrays - (2007-10-24)
  [1601] Replacing the last comma with an and - (2008-04-04)
  [2468] What are Tcl lists? - (2009-10-22)
  [2472] split and join in tcl and expect - (2009-10-23)
  [3285] Extracting data from a string / line from file - Tcl - (2011-05-10)
  [3394] The difference between lists and strings - Tcl - (2011-08-16)
  [3415] User defined sorting and other uses of callbacks in Tcl and Tk - (2011-09-02)
  [3582] Tcl collections - lists, dicts and array - (2012-01-16)
  [3583] Expanding a list of parameters in Tcl - {*} and eval - (2012-01-17)
  [3618] lists and struct::list in Tcl - Introduction to struct::list and examples - (2012-02-18)
  [4454] Everything is a string - even a list - (2015-03-11)
  [4455] Working out distance between places, using OS grid references and a program in Tcl - (2015-03-11)


Back to
Tcl + Tk (Wish) - an introduction and revision example
Previous and next
or
Horse's mouth home
Forward to
If elif elif elif - multiway selection in Python
Some other Articles
Formatting options in Python
Python functions - an introduction to how they work
Handling JSON in Python (and a csv, marshall and pickle comparison)
If elif elif elif - multiway selection in Python
Lists in Tcl - fundamentals in a commented source code example
Tcl + Tk (Wish) - an introduction and revision example
Exception handling in Tcl
Writing the perfect program in Tcl?
Regular Expression Substitution - Tcl
With the Shpigs and Donkeys
4759 posts, page by page
Link to page ... 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96 at 50 posts per page


This is a page archived from The Horse's Mouth at http://www.wellho.net/horse/ - the diary and writings of Graham Ellis. Every attempt was made to provide current information at the time the page was written, but things do move forward in our business - new software releases, price changes, new techniques. Please check back via our main site for current courses, prices, versions, etc - any mention of a price in "The Horse's Mouth" cannot be taken as an offer to supply at that price.

Link to Ezine home page (for reading).
Link to Blogging home page (to add comments).

You can Add a comment or ranking to this page

© WELL HOUSE CONSULTANTS LTD., 2021: 48 Spa Road • Melksham, Wiltshire • United Kingdom • SN12 7NY
PH: 01144 1225 708225 • EMAIL: info@wellho.net • WEB: http://www.wellho.net • SKYPE: wellho

PAGE: http://www.wellho.net/mouth/4209_Lis ... ample.html • PAGE BUILT: Sun Oct 11 16:07:41 2020 • BUILD SYSTEM: JelliaJamb