my %Belfast_car_dealer_hash =  map{$_=>1} 
                 @{$car_city_dealer_aoa[0]} [1..$#{$car_city_dealer_aoa[0]}];