$,=$";print sort{(@a>7)/2>rand}@a=1..2**<>-1