File Coverage

blib/lib/BackPAN/Version/Discover/Results.pm
Criterion Covered Total %
statement 6 8 75.0
branch n/a
condition n/a
subroutine 2 3 66.6
pod 1 1 100.0
total 9 12 75.0


line stmt bran cond sub pod time code
1             package BackPAN::Version::Discover::Results;
2              
3             our $VERSION = '0.01';
4              
5 2     2   13 use warnings;
  2         5  
  2         105  
6 2     2   13 use strict;
  2         5  
  2         282  
7              
8             # yeah, it's only "OO" because that's what all the cool kids do.
9             sub new {
10 0     0 1   my ($class, %args) = @_;
11              
12 0           return bless \%args, $class;
13             }
14              
15             ###
16             1;
17              
18             __END__