| Subject: | Organization HQ address often incomplete |
When generating lots of data, I'm getting much less complete information than I expected:
$ perl -Ilib -MData::Random::Contact -MData::Dumper -MList::MoreUtils=any -E 'for (1..$ARGV[0]){my $org = Data::Random::Contact->new->organization; my $addr = $org->{address}->{headquarters}; warn Dumper $addr if any { !defined $addr->{$_} } qw/city region/; }' 1000
$VAR1 = {
'city' => undef,
'region_abbr' => 'AZ',
'postal_code' => undef,
'region' => 'Arizona',
'street_2' => undef,
'street_1' => undef
};
$VAR1 = {
'city' => undef,
'region_abbr' => 'AZ',
'postal_code' => undef,
'region' => 'Arizona',
'street_2' => undef,
'street_1' => undef
};
$VAR1 = {
'city' => undef,
'region_abbr' => undef,
'postal_code' => undef,
'region' => 'USA',
'street_2' => undef,
'street_1' => undef
};
While it might technically be true that HQ is in "USA", that's not really an address. Did you intend to generate incomplete addresses like these?