https://github.com/michal-josef-spacek/www-search-kacurcz

Class for searching http://kacur.cz .
https://github.com/michal-josef-spacek/www-search-kacurcz

Last synced: 2 months ago
JSON representation

Class for searching http://kacur.cz .

• Host: GitHub
• URL: https://github.com/michal-josef-spacek/www-search-kacurcz
• Owner: michal-josef-spacek
• License: bsd-2-clause
• Created: 2014-09-02T21:18:33.000Z (over 10 years ago)
• Default Branch: master
• Last Pushed: 2023-12-12T13:06:01.000Z (over 1 year ago)
• Last Synced: 2025-01-01T04:45:43.429Z (4 months ago)
• Language: Perl
• Size: 60.5 KB
• Stars: 1
• Watchers: 2
• Forks: 0
• Open Issues: 0
• Metadata Files:
  • Readme: README
  • Changelog: Changes
  • Funding: .github/FUNDING.yml
  • License: LICENSE

Awesome Lists containing this project

README

        
NAME

    WWW::Search::KacurCZ - Class for searching http://kacur.cz .

SYNOPSIS

     use WWW::Search;

     my $obj = WWW::Search->new('KacurCZ');

     $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.

EXAMPLE

     use strict;

     use warnings;

     use Data::Printer;

     use WWW::Search::KacurCZ;

     # Arguments.

     if (@ARGV < 1) {

             print STDERR "Usage: $0 match\n";

             exit 1;

     }

     my $match = $ARGV[0];

     # Object.

     my $obj = WWW::Search->new('KacurCZ');

     $obj->maximum_to_retrieve(1);

     # Search.

     $obj->native_query($match);

     while (my $result_hr = $obj->next_result) {

            p $result_hr;

     }

     # Output:

     # Usage: /tmp/1Ytv23doz5 match

     # Output with 'Čapek' argument:

     # \ {

     #     author          "Guillaume Apollinaire",

     #     cover_url       "http://kacur.cz/data/USR_001_OBRAZKY/small_196566.JPG",

     #     old_price       "2 000 Kč",

     #     price           "1 000 Kč",

     #     publisher       "Symposion",

     #     title           "Kacíř a spol"

     #     url             "http://kacur.cz/index.asp?menu=1123&record=140698",

     # }

DEPENDENCIES

    Encode, LWP::UserAgent, Perl6::Slurp, Readonly, Text::Iconv,

    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

    

AUTHOR

    Michal Josef Špaček 

    

LICENSE AND COPYRIGHT

    © Michal Josef Špaček 2014-2023

    BSD 2-Clause License

VERSION

    0.03