my %town;
$town{G}{6} = 7; # 7 houses on street 6 in town G