my ($lat, $long) = @{$data{$town}};