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 11     11   212680 use v5.14.0;
  11         46  
4 11     11   73 use warnings;
  11         32  
  11         1568  
5              
6             our $VERSION = "0.05";
7              
8             sub new {
9 29     29 1 227 my ($class, %args) = @_;
10             bless {
11             package => $args{package},
12             functions => $args{functions},
13 29         234 } => $class;
14             }
15              
16 4     4 1 12394 sub package() { $_[0]->{package} }
17 31     31 1 1160 sub functions() { $_[0]->{functions} }
18              
19             1;
20             __END__