NAME
Geo::Demo::Zipskinny - Census 2000 geographic and demographic data by ZIP code, courtesy of ZIPskinny.com
SYNOPSIS
use
Geo::Demo::Zipskinny;
my
$zip
= new Geo::Demo::Zipskinny();
#get the stats page from zipskinny.com over the network
my
$stats
=
$zip
->get(
'90232'
);
#alternatively, read a local copy
#my $stats = $zip->parse($html);
#population of the zip code
my
$pop
=
$stats
->{
'general'
}{
'population'
};
#fractions 0-1 inclusive
my
$asian
=
$stats
->{
'race'
}{
'Asian'
};
my
$k250
=
$stats
->{
'income'
}{
'200000+'
};
my
$asian_count
=
$pop
*
$asian
;
my
$k250_count
=
$pop
*
$k250
;
use
Data::Dumper;
Data::Dumper::Dumper(
$stats
);
DESCRIPTION
Use this for quick access to some ZIP code centric demographic data. ZIPskinny.com claims to have built the site from the Census 2000 data freely available from http://census.gov.
I chose to write this screen scraper after several unproductive hours spent poring over the (copious and dry) census docs and unsuccessfully trying to grok the SF3 files.
AUTHOR
Allen Day, <allenday@ucla.edu>
COPYRIGHT AND LICENSE
Copyright (C) 2008 by Allen Day
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.8 or, at your option, any later version of Perl 5 you may have available.