Perl for Exploring DNA