my %hash = (
"bob" => "section-a",
"bob" => "section-b",
);

for my $key ( keys %hash ) {
        my $value = $shit{$key};
        print "$key => $value\n";
}

##</code><code>##



##</code><code>##

my %hash = (
"bob" => "section-a",
"bob" => "section-b",
);

for ( my ( $key, $value ) = each %hash ) {
        print "$key => $value\n";
}