Condition Coverage

blib/lib/PDF/Tiny.pm
Criterion Covered Total %
condition 76 133 57.1


and 2 conditions

line l !l condition
262 12 0 $node->[1]{$_} and not $temp_copy->[1]{$_} and $temp_copy->[1]{$_} = $node->[1]{$_}

and 3 conditions

line !l l&&!r l&&r condition
150 2 0 0 $ix and $gen != 65535
257 0 6 0 $temp_copy->[1]{'Resources'} && $temp_copy->[1]{'MediaBox'} && $temp_copy->[1]{'CropBox'}
0 8 0 not $temp_copy->[1]{'Resources'} && $temp_copy->[1]{'MediaBox'} && $temp_copy->[1]{'CropBox'} and $node->[1]{'Parent'}
262 8 4 0 $node->[1]{$_} and not $temp_copy->[1]{$_}
290 0 0 0 $page->[1]{'Resources'} && $page->[1]{'MediaBox'} && $page->[1]{'CropBox'}
0 0 0 not $page->[1]{'Resources'} && $page->[1]{'MediaBox'} && $page->[1]{'CropBox'} and $node->[1]{'Parent'}[1] ne $pages_id
294 0 0 0 $node->[1]{$_} and $page->[1]{$_} = $node->[1]{$_}
322 0 3 0 @{$id_array->[1];} == 2 and $self->vivify_obj('str', $id_array, 0)->[1] ne $self->[3] || $self->vivify_obj('str', $id_array, 1)->[1] ne $self->[3]
399 1 0 3 @{$id_array->[1];} == 2 and $self->vivify_obj('str', $id_array, 0)->[1] ne $self->[3]
494 0 2 1 @_ == 1 and not $_[0] =~ m[^/]
552 3 66 0 $id and $read_id ne $id
640 0 69 31 $obj and $obj->[0] eq 'ref'
740 4 16 0 $id && ($cach->{$id} || die("Internal error: $obj got uncached"))
854 0 0 0 $pa <= $pb && $pa <= $pc
883 191 1112 168 $more and length $_ < 500
893 0 605 819 defined $endtoken and length $2
605 737 82 defined $endtoken and length $2 and $1 =~ /$endtoken/
924 1026 1 3 length($_) + length($line) > 254 and /^$S*([(<])/o
947 79 948 0 length $line and !($line =~ /$D\z/o || /^$D/o) || length($line) + length($_) > 254
981 16 82 197 @$tokens >= 2 and $tokens->[0] =~ /^\d+$/
98 67 130 @$tokens >= 2 and $tokens->[0] =~ /^\d+$/ and $tokens->[1] eq 'R'
254 295 0 $_ =~ /^\d+$/ and (@$tokens >= 2 and $tokens->[0] =~ /^\d+$/ and $tokens->[1] eq 'R')
19 0 8 /^[+\-]?[\d\.]+$/ and tr/.// == 1

or 2 conditions

line l !l condition
76 1 1 $opts{'version'} || 1.4
210 11 0 shift() || $self->get_obj('/Root', '/Pages') || (return wantarray ? () : 0)
383 2 0 ($args{'fh'} // $args{'filename'}) // croak('No file to write to!')
510 5 66 $self->[10]{$id} || (next)
515 66 0 $self->[8]{$id} || (return $null)
532 0 0 $self->[10]{$id} ||= ['flat', substr($$stream, $off, @numbers ? $numbers[1] - $off : length $$stream)]
699 2 2 ($self->[12] ||= do { require Hash::Util::FieldHash; &Hash::Util::FieldHash::fieldhash({}) })->{$spdf} ||= {}

or 3 conditions

line l !l&&r !l&&!r condition
246 4 0 0 $pages[$num] || croak("No such page: $num")
278 0 2 2 $whither // @{$pages_array->[1];}
322 0 0 3 $self->vivify_obj('str', $id_array, 0)->[1] ne $self->[3] || $self->vivify_obj('str', $id_array, 1)->[1] ne $self->[3]
328 3 0 0 $self->vivify_obj('str', $id_array, 0)->[1] ||= time . '' ^ '' . (rand) ^ '' . (0 + $self)
383 2 0 2 $args{'fh'} // $args{'filename'}
621 54 40 0 $self->[10]{$obj} || $self->read_obj($obj)
642 16 15 0 $self->[10]{$obj->[1]} || $self->read_obj($obj->[1])
699 2 2 0 $self->[12] ||= do { require Hash::Util::FieldHash; &Hash::Util::FieldHash::fieldhash({}) }
742 16 4 0 $ret ||= $clone
766 0 23 0 shift @{$$self[7];} || $self->[6]++ . ' 0'
782 2 0 1 $self->get_obj($stream, '/DecodeParms') || $self->get_obj($stream, '/DP')
805 0 2 0 $predictor == 1 or $predictor >= 10
883 0 0 1303 not length $_ or length $_ == $prev_length
947 423 2 523 !($line =~ /$D\z/o || /^$D/o) || length($line) + length($_) > 254
981 171 0 27 /^[+\-]?\d+$/ or /^[+\-]?[\d\.]+$/ and tr/.// == 1
1103 36 0 99 not $_ or $_ == 0