@a=/./g,print@a.$/,sort({1^-vec' \x81\x97~Q\xc4N',38*/z/+$i++,1}@a)," / "for<>
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page