character subsets by ais523(slightly cheat)

@x=split/(?:ooo)?/,<>;for$p(0..1<<$#x){print$p&(1<<($#x-$_-1))?$x[$_]:''for 0..$#x;print'\x0d
'}

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

download

return to the top page