Complementing a Strand of DNA
http://rosalind.info/problems/revc/
Sample input
AAAACCCGGT
Sample output
ACCGGGTTTT
use v6;
sub MAIN($input = "AAAACCCGGT") {
.flip.trans('ACGT' => 'TGCA').say given $input;
}
# vim: expandtab shiftwidth=4 ft=perl6
See Also
The Camelia image is copyright 2009 by Larry Wall. "Raku" is trademark of the Yet Another Society.
All rights reserved.
Built with Podlite ā the markup and publishing tools behind this site.