File Coverage

blib/lib/Carmel/CPANfile.pm
Criterion Covered Total %
statement 12 15 80.0
branch 0 2 0.0
condition n/a
subroutine 4 5 80.0
pod 0 1 0.0
total 16 23 69.5


line stmt bran cond sub pod time code
1             package Carmel::CPANfile;
2 1     1   6 use strict;
  1         4  
  1         25  
3 1     1   4 use warnings;
  1         1  
  1         23  
4 1     1   413 use Module::CPANfile;
  1         5082  
  1         32  
5 1     1   8 use Class::Tiny qw( path );
  1         2  
  1         8  
6              
7             sub load {
8 0     0 0   my $self = shift;
9              
10 0 0         $self->path->exists
11             or die "Can't locate 'cpanfile' to load module list.\n";
12              
13 0           Module::CPANfile->load($self->path);
14             }
15              
16             1;