partition by parity by dcutter

print$_<0?'':$_*1,$/for sort{$a%2<=>$b%2||$a<=>$b}<>,-1

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page