Evaluated proc ppl args { m [chunk $::ok123 2] {x {. [^B][first $x][^O] [second $x]}} \n }