my $prob_es = ( keys %$hash_es ) / 6939873;
my $prob_en = ( keys %$hash_en ) / 6939873;

##</code><code>##

my $prob_es = ( $#{$hash_es{$string_es}} + 1) / 6939873;
my $prob_en = ( $#{$hash_es{$string_en}} + 1 ) / 6939873;