Evaluated proc killme {list blog} { map $list {x [first $blog] [lrange $blog 1 end]} }