Evaluated proc rppl {{n 1}} { lrange [shuf [loffset $::irc_ppl 0 2]] 0 [- $n 1] }