File Coverage

blib/lib/Bintray/API.pm
Criterion Covered Total %
statement 21 27 77.7
branch n/a
condition n/a
subroutine 7 10 70.0
pod 0 3 0.0
total 28 40 70.0


line stmt bran cond sub pod time code
1             package Bintray::API;
2              
3             #######################
4             # LOAD MODULES
5             #######################
6 1     1   671 use strict;
  1         2  
  1         43  
7 1     1   4 use warnings FATAL => 'all';
  1         2  
  1         44  
8 1     1   11 use Carp qw(croak carp);
  1         2  
  1         74  
9              
10             #######################
11             # VERSION
12             #######################
13             our $VERSION = '1.0.1';
14              
15             #######################
16             # LOAD CPAN MODULES
17             #######################
18 1     1   518 use Object::Tiny qw(session);
  1         275  
  1         5  
19              
20             #######################
21             # LOAD DIST MODULES
22             #######################
23 1     1   435 use Bintray::API::Search;
  1         2  
  1         8  
24 1     1   28 use Bintray::API::Session;
  1         1  
  1         2  
25 1     1   396 use Bintray::API::Subject;
  1         2  
  1         7  
26              
27             #######################
28             # PUBLIC METHODS
29             #######################
30              
31             ## ====================
32             ## CONSTRUCTOR
33             ## ====================
34             sub new {
35 0     0 0   my ( $class, @args ) = @_;
36              
37             # Set Session
38 0           my %opts;
39 0           $opts{session} = Bintray::API::Session->new(@args);
40              
41             # Return Object (tiny)
42 0           return $class->SUPER::new(%opts);
43             } ## end sub new
44              
45             ## ====================
46             ## Bintray OBJECTS
47             ## ====================
48             sub search {
49 0     0 0   return Bintray::API::Search->new(
50             session => shift->session,
51             @_,
52             );
53             } ## end sub search
54              
55              
56             sub subject {
57 0     0 0   return Bintray::API::Subject->new(
58             session => shift->session,
59             @_,
60             );
61             } ## end sub subject
62              
63             #######################
64             1;
65              
66             __END__