-my ( $run_time_beg, $run_time_end, $options, $in, $out, $record, $genome_file, $index_file, $fh, $genome,
- $beg, $end, $len, $index_beg, $index_len, @begs, @lens, $index, $seq, $i, %lookup_hash );
+my ( $options, $in, $out, $record, $genome_file, $index_file, $fh, $genome,
+ $beg, $end, $len, $index_beg, $index_len, @begs, @lens, $index, $seq, $i );