Evaluated set ll [lrange [last [log] 2] 0 0]; join [map $ll {{x} { . "<[second $x]> [lindex $x 3]" }}] \n