foreach my $key (keys %$hashref) {
    my $weight = $hashref->{$key};
    ...