my $h = $a{$state}{$city} ||= {};
    $h->{'Color'} = $color;