NAME
WWW::Search::ValentinskaCZ - Class for searching http://valentinska.cz .
SYNOPSIS
use WWW::Search;
my $obj = WWW::Search->new('ValentinskaCZ');
$obj->native_query($query);
my $maintainer = $obj->maintainer;
my $res_hr = $obj->next_result;
my $version = $obj->version;
METHODS
For methods look to WWW::Search.
EXAMPLE1
use strict;
use warnings;
use Data::Printer;
use WWW::Search;
# Arguments.
if (@ARGV < 1) {
print STDERR "Usage: $0 match\n";
exit 1;
}
my $match = $ARGV[0];
# Object.
my $obj = WWW::Search->new('ValentinskaCZ');
$obj->maximum_to_retrieve(1);
# Search.
$obj->native_query($match);
while (my $result_hr = $obj->next_result) {
p $result_hr;
}
# Output like:
# Usage: /tmp/1Ytv23doz5 match
# Output with 'Čapek' argument like:
# \ {
# author "Larbaud, Valery; obálka: J. Čapek",
# image "http://www.valentinska.cz/image/cache/data/valentinska/book_144061_1-1024x1024.jpg",
# price "450Kč",
# title "A. O. Barnbooth. Jeho důvěrný deník",
# url "http://www.valentinska.cz/144061-a-o-barnbooth-jeho-duverny-denik"
# }
EXAMPLE2
use strict;
use warnings;
use WWW::Search;
# Object.
my $obj = WWW::Search->new('ValentinskaCZ');
print $obj->maintainer."\n";
# Output:
# Michal Josef Spacek <skim@cpan.org>
DEPENDENCIES
Encode, LWP::UserAgent, Perl6::Slurp, Readonly, URI, Web::Scraper, WWW::Search.
SEE ALSO
- WWW::Search
-
Virtual base class for WWW searches
- Task::WWW::Search::Antiquarian::Czech
-
Install the WWW::Search modules for Czech antiquarian bookstores.
REPOSITORY
https://github.com/michal-josef-spacek/WWW-Search-ValentinskaCZ
AUTHOR
Michal Josef Špaček mailto:skim@cpan.org
LICENSE AND COPYRIGHT
© Michal Josef Špaček 2014-2023
BSD 2-Clause License
VERSION
0.06