#!/usr/bin/perl

         use Scrape::USPS::ZipLookup::Address;
         use Scrape::USPS::ZipLookup;

         my $addr = Scrape::USPS::ZipLookup::Address->new(
           'Focus Research, Inc.',                # Firm
           '',                                    # Urbanization
           '8080 Beckett Center Drive Suite 203', # Delivery Address
           'West Chester',                        # City
           'OH',                                  # State
           '45069-5001'                           # ZIP Code
         );