Evaluated proc kkk {{n 50}} {set out ""; foreach line [lrange [log] end-$n end] { if {[second $line] == "kloeri"} {append out "<@kloeri> [last $line]\n"} }; . $out }