File Coverage

blib/lib/SVGPDF/Polygon.pm
Criterion Covered Total %
statement 18 18 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod 0 1 0.0
total 24 25 96.0


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