Help for this page
my $ranking_dgp = 0; ... print Dumper @gene_score;
$VAR1 = [ undef, ... '0.627447', 3 ];