File Coverage

blib/lib/Perl/Metrics/Lite/Analysis/Sub/Plugin/Lines.pm
Criterion Covered Total %
statement 9 9 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 0 2 0.0
total 13 15 86.6


line stmt bran cond sub pod time code
1             package Perl::Metrics::Lite::Analysis::Sub::Plugin::Lines;
2 3     3   2322 use strict;
  3         11  
  3         95  
3 3     3   18 use warnings;
  3         10  
  3         257  
4              
5       19 0   sub init {
6             }
7              
8             sub measure {
9 19     19 0 53 my ( $self, $context, $sub ) = @_;
10              
11 19         75 my $sub_length
12             = Perl::Metrics::Lite::Analysis::Util::get_node_length($sub);
13 19         58 return $sub_length;
14             }
15              
16             1;
17              
18             __END__