for my $k (keys %hash) {
    if ($k eq "name") {
        $hash{$k}++;
    }
}