=head1 NAME
=head1 SYNOPSIS
=head1 DESCRIPTION
=head1 USAGE
=head1 BUGS
=head1 AUTHOR
=head1 METHODS
Methods follow in alphabetical order.
=over 4
=item my $seq = Sequence->new([$dna]);
Constructs a Sequence object
=item my $dna = $seq->revcom
Returns the reverse complement of a sequence.
=cut