Text this: Genomic Perl :