File Coverage

blib/lib/PDF/API2/Resource/Pattern.pm
Criterion Covered Total %
statement 9 13 69.2
branch n/a
condition n/a
subroutine 3 4 75.0
pod 1 1 100.0
total 13 18 72.2


line stmt bran cond sub pod time code
1             package PDF::API2::Resource::Pattern;
2              
3 38     38   294 use base 'PDF::API2::Resource';
  38         91  
  38         4206  
4              
5 38     38   269 use strict;
  38         92  
  38         827  
6 38     38   202 use warnings;
  38         94  
  38         4047  
7              
8             our $VERSION = '2.043'; # VERSION
9              
10             sub new {
11 0     0 1   my ($class, $pdf, $name) = @_;
12 0           my $self = $class->SUPER::new($pdf, $name);
13              
14 0           $self->type('Pattern');
15              
16 0           return $self;
17             }
18              
19             1;