perl -e 's/(\d)(\d)(\d)\//chr($1*16+$2*4+$3+64)/ge;print' CODE_HERE