<![CDATA[BOL: Perl6 script to count ATGC !]]> https://bioinformaticsonline.com/snippets/view/40726/perl6-script-to-count-atgc? https://bioinformaticsonline.com/snippets/view/40726/perl6-script-to-count-atgc Tue, 28 Jan 2020 05:45:48 -0600 https://bioinformaticsonline.com/snippets/view/40726/perl6-script-to-count-atgc <![CDATA[Perl6 script to count ATGC !]]> use v6; my $default-input = "AGCTTTTCATTCTGACTGCAACGGGCAATATGTCTCTGTGTGGATTAAAAAAAGAGTGTCTGATAGCAGC"; sub MAIN($input = $default-input) { "{<A C G T>.map({ +$input.comb(/$_/) })}".say; } #I love perl v6]]> Poonam Mahapatra https://bioinformaticsonline.com/snippets/view/40726/perl6-script-to-count-atgc#item-annotation-3722 Tue, 28 Jan 2020 05:47:41 -0600 https://bioinformaticsonline.com/snippets/view/40726/perl6-script-to-count-atgc#item-annotation-3722 <![CDATA[Comment by Jit]]> Yes, indeed intersting but complex script script in Perl v6

More at https://examples.p6c.dev/categories/rosalind.html 

]]> Jit