diff options
| author | Garrett Goebel <garrett.goebel@gmail.com> | 2020-12-08 18:53:48 -0500 |
|---|---|---|
| committer | Garrett Goebel <garrett.goebel@gmail.com> | 2020-12-08 18:53:48 -0500 |
| commit | e37762846b7c44fdcafb9d58edf3a7b5f2246747 (patch) | |
| tree | 89e09d892590822ff6555ee1f2b418e0a562e9ed | |
| parent | b2142f9dbfe0bec3146ea3ef6bd76241438b167e (diff) | |
| download | perlweeklychallenge-club-e37762846b7c44fdcafb9d58edf3a7b5f2246747.tar.gz perlweeklychallenge-club-e37762846b7c44fdcafb9d58edf3a7b5f2246747.tar.bz2 perlweeklychallenge-club-e37762846b7c44fdcafb9d58edf3a7b5f2246747.zip | |
challenge-090 Task 1 Raku
| -rw-r--r-- | challenge-090/garrett-goebel/raku/ch-1.raku | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/challenge-090/garrett-goebel/raku/ch-1.raku b/challenge-090/garrett-goebel/raku/ch-1.raku index 7c034427ea..00c9d0df57 100644 --- a/challenge-090/garrett-goebel/raku/ch-1.raku +++ b/challenge-090/garrett-goebel/raku/ch-1.raku @@ -1,2 +1,5 @@ #!/usr/bin/env raku -'GTAAACCCCTTTTCATTTAGACAGATCGACTCCTTATCCATTCTCAGAGATGTGTTGCTGGTCGCCG'.comb.elems.say; +'GTAAACCCCTTTTCATTTAGACAGATCGACTCCTTATCCATTCTCAGAGATGTGTTGCTGGTCGCCG'.&{ + say 'Nucleiobase count: ' ~ .comb.elems; + say 'Complementary sequence: ' ~ TR/TAGC/ATCG/; +} |