#!perl -pl @x=a1..$_;$_="@{[(a1..h8)[grep!/-|8|9/,map@x-88+ord,Oclj_KBD=~/./g]]}"
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page