Select Code to Download

 FASTA: for (my $h=0;$h<(@fastarray);$h++) {
  $setscounter = 0;
...
   next FASTA;
   #closes for fastarray
  }

...in $matches{>scaffold_446}{0}[1]
$sets{>scaffold_446}[1] is:
...
$VAR2 = [
          1829
        ];