perl scripts for genomic class