[tcl] слияние листа в строку

Ты же не лист сливаешь, а строку.

может быть, я совсем позабыл тикль, но там же строка - это список символов. так что же вы тогда хотели получить?

И чем же он не аналог перлового join ?

@str = ("a 1", "b 2", "c 3");
print join(",", @str) . "\n";

> a 1,b 2,c 3

set str {"a 1" "b 2" "c 3"}
puts [join $str ","]

> a 1,b 2,c 3

join совершенно не причем. В TCL только один тип, который каждая функция интерпретирует по своему. Функции для строк со _всеми_ переменными работают как со строками, функции для списков - со _всеми_ переменными как со списками, а список, грубо говоря, это строка, в которой элементы разделены пробелами.

может быть, я совсем позабыл тикль, но там же строка - это список символов

там список - это строка, ты имел ввиду

type String = [Char]

?