perl -pe's~(\d)(.)(.)/~chr$1*16+$2*4+$3+64~ge' DATA_FILE