Changeset 1823

Show
Ignore:
Timestamp:
05/18/06 22:03:21
Author:
bricas
Message:

bump version
update dist files
added pod/pod_coverage tests

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • WWW-OpenSearch/branches/WWW-OpenSearch-rewrite/Changes

    r1822 r1823  
    11Revision history for Perl extension WWW::OpenSearch 
    22 
    3 0.06 Thu May 18 2006 
     30.06_01 Thu May 18 2006 
    44        - Complete re-write to handle OpenSearch 1.1/Atom 
    55        - Now uses XML::Feed to abstract RSS and Atom 
  • WWW-OpenSearch/branches/WWW-OpenSearch-rewrite/MANIFEST

    r1802 r1823  
    11Changes 
    22lib/WWW/OpenSearch.pm 
     3lib/WWW/OpenSearch/Description.pm 
     4lib/WWW/OpenSearch/Response.pm 
     5lib/WWW/OpenSearch/Url.pm 
    36Makefile.PL 
    47MANIFEST                        This list of files 
     
    69t/00_compile.t 
    710t/01_live.t 
    8 t/02_paginate.t 
    9 META.yml                                 Module meta-data (added by MakeMaker) 
     11t/98_pod.t 
     12t/99_pod_coverage.t 
  • WWW-OpenSearch/branches/WWW-OpenSearch-rewrite/README

    r1802 r1823  
    33 
    44SYNOPSIS 
    5       use WWW::OpenSearch; 
    6  
    7       my $url = "http://bulkfeeds.net/opensearch.xml"; 
    8       my $engine = WWW::OpenSearch->new($url); 
    9  
    10       my $name = $engine->ShortName; 
    11       my $tags = $engine->Tags; 
    12  
    13       my $feed = $engine->search("iPod"); 
    14       for my $item (@{$feed->items}) { 
    15           print $item->{description}; 
    16       } 
    17  
    18       # page through page 2 with 20 items in each page 
    19       # Note that some engines don't allow changing these values 
    20       $engine->pager->entries_per_page(20); 
    21       $engine->pager->current_page(2); 
    22       my $feed = $engine->search("iPod"); 
    23  
    24 BETA 
    25     This module is in beta version, which means its API interface and 
    26     functionalities may be changed in future releases. 
     5        use WWW::OpenSearch; 
     6     
     7        my $url = "http://bulkfeeds.net/opensearch.xml"; 
     8        my $engine = WWW::OpenSearch->new($url); 
     9     
     10        my $name = $engine->description->ShortName; 
     11        my $tags = $engine->description->Tags; 
     12     
     13        # Perform search for "iPod" 
     14        my $response = $engine->search("iPod"); 
     15        for my $item (@{$response->feed->items}) { 
     16            print $item->{description}; 
     17        } 
     18     
     19        # Retrieve the next page of results 
     20        my $next_page = $response->next_page; 
     21        for my $item (@{$next_page->feed->items}) { 
     22            print $item->{description}; 
     23        } 
    2724 
    2825DESCRIPTION 
     
    3027    engines. See http://opensearch.a9.com/ for details. 
    3128 
     29CONSTRUCTOR 
     30  new( $url ) 
     31    Constructs a new instance of WWW::OpenSearch using the given URL as the 
     32    location of the engine's OpenSearch Description document (retrievable 
     33    via the description_url accessor). 
     34 
     35METHODS 
     36  fetch_description( [ $url ] ) 
     37    Fetches the OpenSearch Descsription found either at the given URL or at 
     38    the URL specified by the description_url accessor. Fetched description 
     39    may be accessed via the description accessor. 
     40 
     41  search( $query [, \%params] ) 
     42    Searches the engine for the given query using the given search 
     43    parameters. Valid search parameters include: 
     44 
     45    * startPage 
     46    * totalResults 
     47    * startIndex 
     48    * itemsPerPage 
     49 
     50    See http://opensearch.a9.com/spec/1.1/response/#elements for details. 
     51 
     52  do_search( $url [, $method] ) 
     53    Performs a request for the given URL and returns a 
     54    WWW::OpenSearch::Response object. Method defaults to 'GET'. 
     55 
     56ACCESSORS 
     57  description_url( [$description_url] ) 
     58  agent( [$agent] ) 
     59  description( [$description] ) 
    3260AUTHOR 
    33     Tatsuhiko Miyagawa <miyagawa@bulknews.net> 
     61    * Tatsuhiko Miyagawa <miyagawa@bulknews.net> 
     62    * Brian Cassidy <bricas@cpan.org> 
     63 
     64COPYRIGHT AND LICENSE 
     65    Copyright 2006 by Tatsuhiko Miyagawa and Brian Cassidy 
    3466 
    3567    This library is free software; you can redistribute it and/or modify it 
    3668    under the same terms as Perl itself. 
    3769 
    38 SEE ALSO 
    39     XML::Simple, XML::RSS, Data::Page, LWP 
    40  
  • WWW-OpenSearch/branches/WWW-OpenSearch-rewrite/lib/WWW/OpenSearch.pm

    r1821 r1823  
    1313__PACKAGE__->mk_accessors( qw( description_url agent description ) ); 
    1414 
    15 our $VERSION = '0.06'; 
     15our $VERSION = '0.06_01'; 
    1616 
    1717=head1 NAME