use v6; my $default-input = "AGCTTTTCATTCTGACTGCAACGGGCAATATGTCTCTGTGTGGATTAAAAAAAGAGTGTCTGATAGCAGC"; sub MAIN($input = $default-input) { "{<A C G T>.map({ +$input.comb(/$_/) })}".say; } #I love perl v6
Yes, indeed intersting but complex script script in Perl v6
More at https://examples.p6c.dev/categories/rosalind.html
Comments
Yes, indeed intersting but complex script script in Perl v6
More at https://examples.p6c.dev/categories/rosalind.html