File Coverage

lib/WebService/Libris/Library.pm
Criterion Covered Total %
statement 13 13 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 1 1 100.0
total 19 19 100.0


line stmt bran cond sub pod time code
1             package WebService::Libris::Library;
2 1     1   6 use Mojo::Base 'WebService::Libris';
  1         1  
  1         8  
3 1     1   228 use strict;
  1         2  
  1         36  
4 1     1   6 use warnings;
  1         2  
  1         28  
5 1     1   33 use 5.010;
  1         3  
  1         114  
6              
7             __PACKAGE__->_make_text_accessor(qw/name lat long homepage/);
8              
9             sub fragments {
10 1     1 1 29 'library', shift->id;
11             }
12              
13             =head1 NAME
14              
15             WebService::Libris::Library - swedish libraries
16              
17             =head1 SYNOSPIS
18              
19             use 5.010;
20             use WebService::Libris;
21             my $book = (WebService::Libris->search(terms => 'Astrid Lindgren'))[0];
22             for my $library ($book->held_by) {
23             say $library->name;
24             }
25              
26             =head1 DESCRIPTION
27              
28             Objects of this class represent libraries.
29              
30             WebService::Libris::Library inherits all methods from from L.
31              
32             =head1 METHODS
33              
34             All of the following methods return a string on succes, and undef if the
35             information is not available.
36              
37             =head2 name
38              
39             Name of the library
40              
41             =head2 lat
42              
43             Lattiude of the physical location of this library
44              
45             =head2 long
46              
47             Longitude of the physical location of this library
48              
49             =head2 homepage
50              
51             URL to this librarie's homepage
52              
53             =cut
54              
55             1;