print $book('title');

##</code><code>##

print $book->{'title'};

##</code><code>##

use WWW::Scraper::ISBN::Driver;
use WWW::Scraper::ISBN::LOC_Driver;
$driver = WWW::Scraper::ISBN::LOC_Driver->new();

$LOC = "0764516965";
$driver->verbosity(1);
$driver->search($LOC);
die " $LOC Not Found" if ! $driver->found;
print "Here is the info on $LOC\n";
print ref $book;

my $book = $driver->book;
print $book->{title};