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

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