perl scripts for bioinformatics