Evaluated proc get_yt_log {{n 100}} {set out [list]; map [pop [top [lreverse [log]] $n]] {x {lappend out [yturl2id [last $x]]}}; lreverse [lfilter {^$} $out] }