[rosalind] simplify command line data input

Raku · May 6, 2015 · bff64aa · bff64aa
1 parent 5a57ec7
commit bff64aa
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/categories/rosalind/trie-grondilu.pl b/categories/rosalind/trie-grondilu.pl
@@ -40,7 +40,8 @@ (@string is copy, $root = $node)
     }
 }
 
-sub MAIN(@input = qw{ATAGA ATC GAT}) {
+sub MAIN(:$data = "ATAGA ATC GAT") {
+    my @input = $data.split(/\s+/);
     trie @input;
 }