NAME

WWW::Search::Scraper::ZIPplus4 - Get ZIP+4 code, given street address, from www.usps.com. Also helps de-duplicate a mailing list (see eg/ZipPlus4.pl)

SYNOPSIS

Simple

use WWW::Search::Scraper(qw(1.48));
use WWW::Search::Scraper::Request::ZIPplus4;

my $ZIPplus4 = new WWW::Search::Scraper(
        'ZIPplus4',
       ,{   'Delivery_Address' => '1600 Pennsylvannia Ave'
           ,'City'             => 'Washington'
           ,'State'            => 'DC'
           ,'Zip_Code'         => '20500'
        } );

while ( my $response = $ZIPplus4->next_response() )
{    
    print $response->zip()."\n";
}

Complete

use WWW::Search::Scraper(qw(1.48));
use WWW::Search::Scraper::Request::ZIPplus4;

my $ZIPplus4 = new WWW::Search::Scraper( 'ZIPplus4' );

my $request = new WWW::Search::Scraper::Request::ZIPplus4;

# Note: Delivery_Address(), and either Zip_Code(), or City() and State(), are required.
$request->Delivery_Address('1600 Pennsylvannia Ave');
$request->City('Washington');
$request->State('DC');
$request->Zip_Code('20500');

$ZIPplus4->scraperRequest($request);
while ( my $response = $ZIPplus4->next_response() )
{    
    for ( qw(address city state zip county carrierRoute checkDigit deliveryPoint) ) {
        print "$_: ".${$response->$_()}."\n";
    }
}

DESCRIPTION

This class is an ZIPplus4 specialization of WWW::Search. It handles making and interpreting ZIPplus4 searches http://www.ZIPplus4.com.

AUTHOR and CURRENT VERSION

WWW::Search::Scraper::ZIPplus4 is written and maintained by Glenn Wood, http://search.cpan.org/search?mode=author&query=GLENNWOOD.

COPYRIGHT

Copyright (c) 2001 Glenn Wood All rights reserved.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.