File Coverage

blib/lib/MetaCPAN/API/Module.pm
Criterion Covered Total %
statement 19 19 100.0
branch 2 2 100.0
condition n/a
subroutine 6 6 100.0
pod 1 1 100.0
total 28 28 100.0


line stmt bran cond sub pod time code
1 15     15   6233 use strict;
  15         37  
  15         375  
2 15     15   67 use warnings;
  15         31  
  15         585  
3             package MetaCPAN::API::Module;
4             # ABSTRACT: Module information for MetaCPAN::API
5              
6             our $VERSION = '0.51';
7              
8 15     15   76 use Carp;
  15         30  
  15         657  
9 15     15   76 use Moo::Role;
  15         31  
  15         76  
10 15     15   4381 use namespace::autoclean;
  15         33  
  15         78  
11              
12             # /module/{module}
13             sub module {
14 2     2 1 2082 my $self = shift;
15 2         4 my $name = shift;
16              
17 2 100       205 $name or croak 'Please provide a module name';
18              
19 1         8 return $self->fetch("module/$name");
20             }
21              
22             1;
23              
24             __END__