Evaluated proc !! "" {eval [last [lgrep {^tcl } [map [log] {{x} {last $x}}]]]}