File Coverage

lib/ChordPro/lib/SVGPDF/Polygon.pm
Criterion Covered Total %
statement 14 18 77.7
branch n/a
condition n/a
subroutine 5 6 83.3
pod 0 1 0.0
total 19 25 76.0


line stmt bran cond sub pod time code
1             #! perl
2              
3 1     1   13 use v5.26;
  1         3  
4 1     1   8 use Object::Pad;
  1         2  
  1         7  
5 1     1   102 use utf8;
  1         2  
  1         5  
6 1     1   24 use Carp;
  1         2  
  1         95  
7              
8 1     1   350 class SVGPDF::Polygon :isa(SVGPDF::Polyline);
  1         2  
  1         44  
9              
10 0     0 0   method process () {
  0            
  0            
11 0           $self->process_polyline(1);
12             }
13              
14             1;