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