Add use v6 pragma to rosalind examples

Raku · Feb 28, 2015 · 1f15ddd · 1f15ddd
1 parent 1edd74c
commit 1f15ddd
Show file tree

Hide file tree

Showing 7 changed files with 13 additions and 0 deletions.
diff --git a/rosalind/cstr-grondilu.pl b/rosalind/cstr-grondilu.pl
@@ -1,3 +1,5 @@
+use v6;
+
 my @dna = map { [.comb] }, lines;
 
 my @c = @dna[0][];

diff --git a/rosalind/dna-grondilu.pl b/rosalind/dna-grondilu.pl
@@ -1,3 +1,5 @@
+use v6;
+
 say get.comb.bag<A C G T>;
 
 # vim: expandtab shiftwidth=4 ft=perl6
diff --git a/rosalind/eubt-grondilu.pl b/rosalind/eubt-grondilu.pl
@@ -1,3 +1,5 @@
+use v6;
+
 proto combine (Int, @) {*}
 multi combine (0,  @)  { [] }
 multi combine ($,  []) { () }

diff --git a/rosalind/fib-grondilu.pl b/rosalind/fib-grondilu.pl
@@ -1,3 +1,4 @@
+use v6;
 
 my ($n, $k) = get.words;
 my @fib := 1, 1, * * $k + * ... *;

diff --git a/rosalind/fibd-grondilu.pl b/rosalind/fibd-grondilu.pl
@@ -1,3 +1,5 @@
+use v6;
+
 my ($n, $m) = get.words;
 
 my @population = 1, 0 xx ($m-1);

diff --git a/rosalind/lcsq-grondilu.pl b/rosalind/lcsq-grondilu.pl
@@ -1,3 +1,5 @@
+use v6;
+
 use NativeCall;
 sub lcsq(Str $, Str $ --> Str) is native('./lcsq') {*}
 

diff --git a/rosalind/pmch-grondilu.pl b/rosalind/pmch-grondilu.pl
@@ -1,3 +1,5 @@
+use v6;
+
 my $rna = join '', grep /^ <[ACGU]>+ $/, lines;
 
 say [*] map { [*] 1 .. $rna.comb(/$_/).elems }, <U C>;