File Coverage

mock/CPAN/Mini.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 CPAN::Mini;
2              
3 4     4   88 use 5.008;
  4         16  
  4         199  
4              
5 4     4   21 use strict;
  4         9  
  4         184  
6 4     4   20 use warnings;
  4         9  
  4         83  
7              
8 4     4   19 use Carp ();
  4         8  
  4         346  
9              
10             our $VERSION = '0.000_01';
11              
12             our $LOCAL ||= 'mock/repos';
13              
14             sub read_config {
15             return (
16 5     5 1 57 local => $LOCAL,
17             );
18             }
19              
20             1;
21              
22             __END__