view release on metacpan or  search on metacpan

lib/WWW/Scraper/ISBN/PickABook_Driver.pm  view on Meta::CPAN

###########################################################################
# Modules

use WWW::Mechanize;

###########################################################################
# Constants

use constant    REFERER => 'http://www.pickabook.co.uk/';
use constant    SEARCH  => 'http://www.pickabook.co.uk/%s.aspx?ToSearch=TRUE';
my ($URL1,$URL2) = ('http://www.PickABook.co.uk/book/','/[^?]+\?b=\-3\&t=\-26\#Bibliographicdata\-26');

#--------------------------------------------------------------------------

###########################################################################
# Public Interface

=head1 METHODS

=over 4