The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

WWW::Scraper::WSDL

SYNOPSIS

Simple
 use WWW::Scraper::WSDL(qw(1.00));

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

 while ( my $response = $WSDL->next_response() )
 {    
     print $response->zip()."\n";
 }
Complete
 use WWW::Scraper(qw(1.48));
 use WWW::Scraper::Request::WSDL;

 my $WSDL = new WWW::Scraper( 'WSDL' );

 my $request = new WWW::Scraper::Request::WSDL;
 
 # 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');

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

DESCRIPTION

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

AUTHOR and CURRENT VERSION

WWW::Scraper::WSDL 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.