Branch Coverage

blib/lib/PDF/API2/Content.pm
Criterion Covered Total %
branch 209 372 56.1


line true false branch
70 6 0 if ($self->{'-docompress'} and $self->{'Filter'})
197 0 15 if (defined $opts{'-matrix'})
203 9 6 if (defined $opts{'skew'})
206 9 6 if (defined $opts{'scale'})
209 9 6 if (defined $opts{'rotate'})
212 12 3 if (defined $opts{'translate'})
217 0 15 if ($opts{'-point'})
235 0 16 if $options{'repeat'}
238 1 15 if $options{'relative'}
242 14 46 if (exists $options{'-' . $option})
264 4 4 if (exists $options{'-' . $option})
269 2 0 $options{'skew'} ? :
272 2 0 $options{'scale'} ? :
278 2 0 $options{'translate'} ? :
318 26 0 if (scalar @_)
320 3 23 if ($self->_in_text_object) { }
330 3 23 if ($self->_in_text_object) { }
361 0 11 if ($self->_in_text_object)
385 0 11 if ($self->_in_text_object)
456 0 2 if ($self->{' graphics'} and not @_)
461 0 2 if $style eq "butt"
462 1 1 if $style eq "round"
463 0 2 if $style eq "square"
465 0 2 unless ($style >= 0 and $style <= 2)
466 0 0 if ($self->{' graphics'}) { }
516 0 2 if ($self->{' graphics'} and not @_)
521 0 2 if $style eq "miter"
522 0 2 if $style eq "round"
523 1 1 if $style eq "bevel"
525 0 2 unless ($style >= 0 and $style <= 2)
526 0 0 if ($self->{' graphics'}) { }
607 7 3 unless (@options)
611 3 0 if ($options[0] =~ /^\d/)
618 0 0 if ($options{'-pattern'})
621 0 0 if ($options{'-shift'})
627 0 0 if (exists $options{'-full'} or exists $options{'-clear'})
713 0 107 if ($self->_in_text_object) { }
744 0 96 if ($self->_in_text_object) { }
768 0 2 if ($self->_in_text_object) { }
788 0 1 if ($self->_in_text_object) { }
808 0 2 unless (@_ % 2 == 0)
851 0 78 if ($self->_in_text_object) { }
901 68 76 if (abs $beta - $alpha > 30) { }
939 3 1 if $move
980 0 4 if $x < 0 and $y > 0
981 0 4 if $x < 0 and $y < 0
985 1 3 if $spf and $spf > 0
991 1 3 if $larc and $larc > 0
997 1 3 if ($spf and $spf > 0)
1011 1 3 if $move
1019 1 35 if (scalar @points == 0) { }
1071 1 1 if ($x2 < $x1)
1076 0 2 if ($y2 < $y1)
1206 23 3 if ($clr[0] =~ /^[a-z\#\!]+/) { }
2 1 elsif ($clr[0] =~ /^[\%]+/) { }
0 1 elsif ($clr[0] =~ /^[\$\&]/) { }
0 1 elsif (scalar @clr == 1 and ref $clr[0]) { }
0 1 elsif (scalar @clr == 1) { }
1 0 elsif (scalar @clr > 1 and ref $clr[0]) { }
0 0 elsif (scalar @clr == 2) { }
0 0 elsif (scalar @clr == 3) { }
0 0 elsif (scalar @clr == 4) { }
1210 14 9 $sf ? :
1215 1 1 $sf ? :
1220 0 0 unless (defined $self->resource("ColorSpace", "LabS"))
1228 0 0 $sf ? :
0 0 $sf ? :
1232 0 0 $sf ? :
0 0 $sf ? :
1236 0 0 $sf ? :
1242 0 1 $sf ? :
0 1 $sf ? :
1247 0 0 $sf ? :
0 0 $sf ? :
1251 0 0 $sf ? :
1255 0 0 $sf ? :
1264 0 15 if (ref($clrs[0]) =~ /^PDF::API2::Resource::ColorSpace/) { }
0 15 elsif (ref($clrs[0]) =~ /^PDF::API2::Resource::Pattern/) { }
1279 15 0 if (@_)
1288 1 10 if (ref($clrs[0]) =~ /^PDF::API2::Resource::ColorSpace/) { }
0 10 elsif (ref($clrs[0]) =~ /^PDF::API2::Resource::Pattern/) { }
1302 11 0 if (@_)
1358 1 2 if (@_ == 2) { }
1360 1 0 if (($options{'rule'} // "nonzero") eq "even-odd")
1369 2 1 $even_odd ? :
1389 1 3 if (@_ == 2) { }
1391 1 0 if (($options{'rule'} // "nonzero") eq "even-odd")
1400 2 2 $even_odd ? :
1419 1 2 if (@_ == 2) { }
1421 1 0 if (($options{'rule'} // "nonzero") eq "even-odd")
1430 2 1 $even_odd ? :
1507 0 0 if ($object->isa('PDF::API2::Resource::XObject::Image')) { }
1531 0 8 if (defined $img->{'Metadata'})
1535 8 0 defined $w ? :
1549 0 8 if (defined $img->{'Metadata'})
1559 2 0 if (defined $s) { }
1598 1 17 if ($font->isvirtual) { }
1607 1 18 unless ($size)
1622 1 17 if ($font->isvirtual) { }
1652 3 1 if (defined $spacing)
1684 15 10 if (defined $spacing)
1708 2 12 if (defined $scale)
1738 11 35 if (defined $leading)
1780 1 0 if (defined $mode)
1806 1 0 if (defined $distance)
1817 0 0 if (@_) { }
1820 0 0 unless $state{$k}
1823 0 0 if ($state{'font'} and $state{'fontsize'})
1826 0 0 if ($state{'textmatrix'})
1833 0 0 if ($state{'fillcolor'})
1836 0 0 if ($state{'strokecolor'})
1879 0 59 if (defined $x and not defined $y)
1883 1 58 if (defined $x)
1906 2 1 if (defined $offset) { }
1931 22 1 if ($leading or not $self->{' fontsize'}) { }
2035 0 0 if (ref $underline eq 'ARRAY') { }
2041 0 0 if @underline % 2
2053 0 0 if (ref $thickness)
2056 0 0 if ($distance eq "auto")
2059 0 0 if ($thickness eq "auto")
2079 1 29 unless ($self->{' fontset'})
2080 1 0 unless (defined $self->{' font'} and $self->{' fontsize'})
2088 10 19 if (exists $opts{'-indent'})
2091 0 29 if (exists $opts{'-underline'})
2097 12 17 if (defined $opts{'align'})
2098 6 6 if ($opts{'align'} eq 'left') { }
3 3 elsif ($opts{'align'} eq 'center') { }
3 0 elsif ($opts{'align'} eq 'right') { }
2112 12 17 if (defined $opts{'indent'})
2118 12 17 if (defined $opts{'indent'}) { }
2131 0 29 if (defined $opts{'underline'})
2167 1 0 if $space_count
2180 12 100 if $self->advancewidth(join($", @line)) > $width
2182 12 7 if (scalar @line > 1 and $self->advancewidth(join($", @line)) > $width)
2219 4 4 if ($ret)
2220 4 0 if $space_count
2227 3 1 if ($opts{'align-last'})
2228 0 3 unless ($opts{'align-last'} =~ /^(left|center|right|justified)$/)
2233 1 3 if ($align_last eq 'left') { }
1 2 elsif ($align_last eq 'center') { }
1 1 elsif ($align_last eq 'right') { }
2243 1 0 if $space_count
2292 6 4 if (exists $opts{'-align'})
2295 3 7 if (exists $opts{'-align-last'})
2298 0 10 if (exists $opts{'-underline'})
2303 0 10 unless ($leading)
2308 1 9 if ($text =~ /\n/)
2312 0 3 if (length $overflow)
2318 1 2 unless (length $line)
2325 1 1 if length $line
2328 0 1 if wantarray
2335 2 19 if $height < 0
2338 8 11 if ($align eq 'justified' or $align eq 'justify') { }
2 9 elsif ($align eq 'right') { }
2 7 elsif ($align eq 'center') { }
2353 2 7 if wantarray
2367 0 0 if $opts{'-rotate'}
2370 0 0 if ($wastext)
2379 0 0 if ($opts{'-color'})
2380 0 0 ref $opts{'-color'} ? :
2383 0 0 if ($opts{'-strokecolor'})
2386 0 0 ref $opts{'-strokecolor'} ? :
2392 0 0 if $opts{'-charspace'}
2393 0 0 if $opts{'-hscale'}
2394 0 0 if $opts{'-wordspace'}
2395 0 0 if $opts{'-render'}
2398 0 0 if ($opts{'-right'} or $align =~ /^r/i) { }
0 0 elsif ($opts{'-center'} or $align =~ /^c/i) { }
2411 0 0 if ($wastext)
2440 0 183 unless defined $text and length $text
2443 0 183 if (exists $opts{'size'})
2446 0 183 if (exists $opts{'character_spacing'})
2449 0 183 if (exists $opts{'word_spacing'})
2454 913 2 unless defined $opts{$k}
2477 0 0 if (defined $obj) { }
2498 0 0 if (@_)
2499 0 0 unless ($self->{' poststream'} =~ /\s$/)
2509 778 0 if (@_)
2510 129 649 unless ($self->{' stream'} =~ /\s$/)
2534 19 0 unless ($self->_in_text_object)
2562 15 108 if ($self->_in_text_object)
2572 29 2 if ($self->{' apipage'}) { }
2581 0 2 if ref($dict) =~ /Objind$/
2584 0 2 if ref($dict->{$type}) =~ /Objind$/
2585 2 0 if (defined $obj) { }
2589 0 2 if ($force) { }