logo
Free, unlimited AI code reviews that run on commit
git-lrc git-lrc GitHub Install Now We'd appreciate a star git-lrc - Free, unlimited AI code reviews that run on commit | Product Hunt git-lrc - Free, unlimited AI code reviews that run on commit | Product Hunt

WWW::OpenSearch - Search A9 OpenSearch compatible engines

Accessors

description_url([$description_url])agent([$agent])description([$description])

Author

       Brian Cassidy <bricas@cpan.org>

       Tatsuhiko Miyagawa <miyagawa@bulknews.net>

Constructor

new($url)
       Constructs a new instance of WWW::OpenSearch using the given URL as the location of the engine's
       OpenSearch Description document (retrievable via the description_url accessor).

Description

       WWW::OpenSearch is a module to search A9's OpenSearch compatible search engines. See
       http://opensearch.a9.com/ for details.

Methods

fetch_description([$url])
       Fetches the OpenSearch Descsription found either at the given URL or at the URL specified by the
       description_url accessor. Fetched description may be accessed via the description accessor.

   search($query[,\%params])
       Searches the engine for the given query using the given search parameters. Valid search parameters
       include:

       •   startPage

       •   totalResults

       •   startIndex

       •   itemsPerPage

       See http://opensearch.a9.com/spec/1.1/response/#elements for details.

   do_search($url[,$method])
       Performs  a  request for the given URL and returns a WWW::OpenSearch::Response object. Method defaults to
       'GET'.

Name

       WWW::OpenSearch - Search A9 OpenSearch compatible engines

Synopsis

           use WWW::OpenSearch;

           my $url = "http://bulkfeeds.net/opensearch.xml";
           my $engine = WWW::OpenSearch->new($url);

           my $name = $engine->description->ShortName;
           my $tags = $engine->description->Tags;

           # Perform search for "iPod"
           my $response = $engine->search("iPod");
           for my $item (@{$response->feed->items}) {
               print $item->{description};
           }

           # Retrieve the next page of results
           my $next_page = $response->next_page;
           for my $item (@{$next_page->feed->items}) {
               print $item->{description};
           }

See Also