How to get all subdirectory names in a list with tcl?

Question

For the certain directory how I can get the child directory names in a list?

Answer 1

Use glob. For example, for the current directory, the command to get all sub-directories is

glob -type d *

Or if you want a specific directory, use the -directory parameter:

glob -directory $mydir -type d *