projects
/
Geo-USCensus-Geocoding.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
bf595ca1e25d764abb8331f997903a45d491ea1c
[Geo-USCensus-Geocoding.git]
/
Geocoding
/
Result.pm
1
package Geo::USCensus::Geocoding::Result;
2
3
use Moo; # just for attribute declaration
4
5
has 'is_match' => ( is => 'rw', default => 0 );
6
foreach ( 'content',
7
'match_level',
8
'address',
9
'state',
10
'county',
11
'tract',
12
'block',
13
'error_message',
14
'latitude',
15
'longitude'
16
) {
17
has $_ => ( is => 'rw', default => '' );
18
}
19
20
sub censustract {
21
my $self = shift;
22
return join('', $self->state, $self->county, $self->tract);
23
}
24
25
1;