12     my $seq =();