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   1282 use v5.26;
  2         5  
4 2     2   11 use Object::Pad;
  2         2  
  2         13  
5 2     2   227 use utf8;
  2         3  
  2         18  
6 2     2   52 use Carp;
  2         2  
  2         269  
7              
8 2     2   731 class SVGPDF::Polygon :isa(SVGPDF::Polyline);
  2         5  
  2         221  
9              
10 2     2 0 3 method process () {
  2         5  
  2         3  
11 2         9 $self->process_polyline(1);
12             }
13              
14             1;