Select Code to Download

           $hash{$Query}[3] = $one;
           $hash{$Query}[4] = $two;

while (<FH>) {
   my ($Query, $Score, $Start, $End, $one, $two) = split;
...
      }
   }
}