File Coverage

blib/lib/App/UpdateCPANfile/CPANfileSnapshotParser.pm
Criterion Covered Total %
statement 13 13 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 0 1 0.0
total 17 18 94.4


line stmt bran cond sub pod time code
1             package App::UpdateCPANfile::CPANfileSnapshotParser;
2 2     2   228231 use strict;
  2         9  
  2         79  
3 2     2   11 use warnings;
  2         5  
  2         68  
4 2     2   1015 use Carton::Snapshot;
  2         400783  
  2         193  
5              
6             sub scan_deps {
7 14     14 0 6119 my ($class, $path) = @_;
8              
9 14         144 my $snapshot = Carton::Snapshot->new(path => $path);
10 14         1481 $snapshot->load;
11 14         193204 [ $snapshot->distributions ];
12             }
13              
14             1;