perl scripts for CpG analysis of whole genome and KEGG annotated files