$n=comp_hash($disthash[$nnn],$arr_my_hash2[$i_index],$dist_seq_hash[$nnn],$arr_my_hash2_seq[$i_index],$disthashog[$nnn],$arr_og2[$i_index]);
	if($n>0.3)
	{
	my $shnn=$nnn+1;
	$thash[$nnn]->{$arr_n_line[$i_index]} = $n;
	last;
	}
	elsif($n>0.09)
	{
		if ($n>$most)
	{	$thash[$nnn]->{$arr_n_line[$i_index]} = $n;}
	}
}
}
$samelist->{$k}=$h3->{$k};

$std_n++;

5 POD Errors

The following errors were encountered while parsing the POD:

Around line 581:

=pod directives shouldn't be over one line long! Ignoring all 6 lines of content

Around line 620:

=pod directives shouldn't be over one line long! Ignoring all 8 lines of content

Around line 654:

=pod directives shouldn't be over one line long! Ignoring all 12 lines of content

Around line 683:

=pod directives shouldn't be over one line long! Ignoring all 7 lines of content

Around line 780:

=pod directives shouldn't be over one line long! Ignoring all 8 lines of content