Evaluated proc kloeri_last {{n 1}} { set i 1; foreach line [ltop [lreverse [log]] 20] { if {[second $line] == "kloeri" && $i == $n} {return [last $line]} {incr i} } }