my %hash = $$hashref;

##</code><code>##

my %hash = %$hashref;

##</code><code>##

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