diff --git a/shootout/revcomp.p6.pl b/shootout/revcomp.p6.pl index 052aee1..6273361 100644 --- a/shootout/revcomp.p6.pl +++ b/shootout/revcomp.p6.pl @@ -4,7 +4,7 @@ # # USAGE: perl6 revcomp.p6.pl < revcomp.input -my($desc,$seq) = ('',''); +my ($desc,$seq) = ('',''); while $*IN.get -> $line { if $line.match(/^ \>/) { print_revcomp();