Perl: reverse complement of a DNA string (ATGCatgc alphabet only)