File Coverage

blib/lib/REST/Google/Search/Patent.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 16 16 100.0


line stmt bran cond sub pod time code
1             #
2             # $Id$
3              
4             package REST::Google::Search::Patent;
5              
6 1     1   1289 use strict;
  1         2  
  1         36  
7 1     1   5 use warnings;
  1         3  
  1         32  
8              
9 1     1   5 use version; our $VERSION = qv('1.0.8');
  1         3  
  1         84  
10              
11             require REST::Google::Search;
12 1     1   98 use base qw/REST::Google::Search/;
  1         2  
  1         125  
13              
14             __PACKAGE__->service( &REST::Google::Search::PATENT );
15              
16             return 1;