Permutations by Mithran

use List::Util'/^/';print sort keys%{{map"@{[shuffle 0..5]}
",0..$$}}

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

download

return top