Lines Matching refs:hseq
381 %hseq = (); %count = ();
404 %hseq=(); # keep only last iteration
441 if (!$hseq{$name}) {
446 if ($npad>0) { $hseq{$name} = $pad }
450 if ($m==4) { $hseq{$name} .= $line[2] }
451 if ($m==6) { $hseq{$name} .= $line[1] }
464 # Preserve original alignment order by using %count instead of %hseq
470 $hlen = length($hseq{$name});
474 if ($npad>0) { $hseq{$name} .= $pad }
476 $hitlen = length($hseq{$name});
480 if ($format eq "fasta") { $hseq{$name} =~ s/\-/X/g }
481 printseq($hseq{$name});