File Coverage

blib/lib/Function/Interface/Info.pm
Criterion Covered Total %
statement 9 9 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 3 3 100.0
total 17 17 100.0


line stmt bran cond sub pod time code
1             package Function::Interface::Info;
2              
3 19     19   219112 use v5.14.0;
  19         78  
4 19     19   116 use warnings;
  19         58  
  19         2755  
5              
6             our $VERSION = "0.06";
7              
8             sub new {
9 29     29 1 215 my ($class, %args) = @_;
10             bless {
11             package => $args{package},
12             functions => $args{functions},
13 29         223 } => $class;
14             }
15              
16 4     4 1 12166 sub package() { $_[0]->{package} }
17 31     31 1 1040 sub functions() { $_[0]->{functions} }
18              
19             1;
20             __END__