Condition Coverage

blib/lib/Data/Dump/Color.pm
Criterion Covered Total %
condition 34 102 33.3


and 3 conditions

line !l l&&!r l&&r condition
57 15 44 0 $_ > $max and $max = $_
203 69 0 0 $] < 5.008 and $type eq 'SCALAR'
247 0 0 0 defined $out and not @bless
258 0 1 0 $ref && $type eq 'SCALAR'
267 0 1 0 @$idx and $idx->[-1] eq '$'
289 0 0 0 $class and $class eq 'Regexp'
350 54 0 0 $class and not @$idx
379 0 0 0 $k eq 'SCALAR' and not defined $$gval
526 0 59 0 defined $origk and length $origk >= $Data::Dump::Color::LENTHRESHOLD
527 0 59 0 defined $origv and length $origv >= $Data::Dump::Color::LENTHRESHOLD
528 0 0 59 $nl && length $visaid
529 0 0 59 $nl && length $visaid
551 68 0 0 $class and $ref
586 2 0 0 $ref and @i
2 0 0 $ref and @i and $i[0][0] eq '$'
590 0 2 0 @i and $i[0][0] eq '$'
659 4 2 0 @vals > $indent_lim and length $tmp > 60 || $tmp =~ /\n/
682 0 0 0 defined $orig[$i] and length $orig[$i] >= $Data::Dump::Color::LENTHRESHOLD
706 0 3 0 length $_ < 16384 and /^(.{2,5}?)\1*\z/s
716 41 0 2 length $_ > 40 and not /\\x\{/
41 2 0 length $_ > 40 and not /\\x\{/ and length $_ > length($_[0]) * 2
722 0 0 0 $Data::Dump::Color::TRY_BASE64 and length $_[0] > $Data::Dump::Color::TRY_BASE64
0 0 0 defined &utf8::is_utf8 and not utf8::is_utf8($_[0])
0 0 0 $Data::Dump::Color::TRY_BASE64 and length $_[0] > $Data::Dump::Color::TRY_BASE64 and (defined &utf8::is_utf8 and not utf8::is_utf8($_[0]))
0 0 0 $Data::Dump::Color::TRY_BASE64 and length $_[0] > $Data::Dump::Color::TRY_BASE64 and (defined &utf8::is_utf8 and not utf8::is_utf8($_[0])) and eval { do { require MIME::Base64 } }

or 3 conditions

line l !l&&r !l&&!r condition
145 1 0 2 %Data::Dump::Color::refcnt or %Data::Dump::Color::require
284 54 0 14 $type eq 'SCALAR' or $type eq 'REF'
54 0 14 $type eq 'SCALAR' or $type eq 'REF' or $type eq 'REGEXP'
464 11 0 0 length $tmp > 60 or $tmp =~ /\n/
11 0 0 length $tmp > 60 or $tmp =~ /\n/ or $tied
598 0 0 2 $i->[0] eq '*' or $i->[0] eq '$'
636 1 0 2 $v eq '0' or $v =~ /^-?[1-9]\d{0,9}\z/
659 0 0 2 length $tmp > 60 || $tmp =~ /\n/
0 0 6 $comment or @vals > $indent_lim and length $tmp > 60 || $tmp =~ /\n/