Branch Coverage

blib/lib/PDF/Builder/Resource/Font/Postscript.pm
Criterion Covered Total %
branch 0 104 0.0


line true false branch
31 0 0 if (defined $opts{'-afmfile'}) { }
0 0 elsif (defined $opts{'-pfmfile'}) { }
0 0 elsif (defined $opts{'-xfmfile'}) { }
41 0 0 if ref $class
44 0 0 unless $self->is_obj($pdf)
47 0 0 if ($opts{'-pdfname'})
53 0 0 if (-f $psfile) { }
66 0 0 if (defined $pdf)
73 0 0 if ($opts{'-encode'} =~ /^utf/i)
79 0 0 if $opts{'-nocomps'}
80 0 0 if $opts{'-dokern'}
89 0 0 unless -f $file
93 0 0 unless open my $inf, '<', $file
97 0 0 if ($lines[0] == 128 and $lines[1] == 1) { }
0 0 elsif ($line eq '%!') { }
103 0 0 if ($lines[0] == 128 and $lines[1] == 2) { }
112 0 0 if ($lines[0] == 128 and $lines[1] == 1) { }
127 0 0 if (not $l1) { }
0 0 elsif (not $l2) { }
129 0 0 if ($line =~ /eexec$/)
135 0 0 if ($line =~ /^0+$/) { }
168 0 0 unless (-e $file)
171 0 0 unless open my $afmf, '<', $file
174 0 0 if (/^StartCharMetrics/ .. /^EndCharMetrics/) { }
0 0 elsif (/^StartKernData/ .. /^EndKernData/) { }
0 0 elsif (/^StartComposites/ .. /^EndComposites/) { }
176 0 0 unless $_ =~ /^CH?\s/
185 0 0 ($data->{'maxwidth'} || 0) < $wx ? :
188 0 0 if ($ch > 0)
191 0 0 $data->{'lastchar'} < $ch ? :
192 0 0 $data->{'firstchar'} > $ch ? :
196 0 0 if ($_ =~ /^KPX\s+(\S+)\s+(\S+)\s+(\S+)\s*$/i)
201 0 0 if ($_ =~ /^CC\s+(\S+)\s+(\S+)\s+;/i)
213 0 0 if $_ =~ /^EndFontMetrics/
214 0 0 if (/(^\w+)\s+(.*)/) { }
217 0 0 if (defined $data->{$key}) { }
229 0 0 unless (exists $data->{'wx'}{'.notdef'})
240 0 0 if (defined $data->{'fullname'}) { }
244 0 0 if $data->{'italicangle'} < 0
245 0 0 if $data->{'italicangle'} > 0
252 0 0 if $data->{'italicangle'} < 0
253 0 0 if $data->{'italicangle'} > 0
277 0 0 unless (-e $file)
291 0 0 unless open $fh, '<', $file
444 0 0 if $df{'PitchAndFamily'} & 1 || $df{'PitchAndFamily'} & 8 and not $df{'PitchAndFamily'} & 2
446 0 0 if $df{'PitchAndFamily'} & 16 and not $df{'PitchAndFamily'} & 32
448 0 0 if $df{'PitchAndFamily'} & 80
450 0 0 if $df{'PitchAndFamily'} & 64
452 0 0 unless $df{'PitchAndFamily'} & 80
454 0 0 if $df{'Italic'}
464 0 0 unless nameByUni($_)
488 0 0 unless -f $xfmfile