diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2022-04-11 15:43:26 -0700 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2022-04-11 15:43:26 -0700 |
| commit | 8a740849b0ae3ecc758ac9c2d69b92234f521fc9 (patch) | |
| tree | bfaf849e209e75dbc270ae4bdca400d668361176 | |
| parent | 980dbd5c9bd158ef683c89c98e0eb9452f908417 (diff) | |
strip address suffixes for better census coding, RT#86245
| -rw-r--r-- | FS/FS/Misc/Geo.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/FS/FS/Misc/Geo.pm b/FS/FS/Misc/Geo.pm index 599b2a0..3beffc8 100644 --- a/FS/FS/Misc/Geo.pm +++ b/FS/FS/Misc/Geo.pm @@ -134,8 +134,11 @@ sub get_censustract_uscensus { my $url = 'https://geocoding.geo.census.gov/geocoder/geographies/address?'; + my $address1 = $location->{address1}; + $address1 =~ s/(apt|ste|suite|unit)[\s\d]\w*\s*$//i; + my $query_hash = { - street => $location->{address1}, + street => $address1, city => $location->{city}, state => $location->{state}, benchmark => 'Public_AR_Current', |