Condition Coverage

File:local/lib/perl5/Data/Printer.pm
Coverage:12.4%

line%coveragecondition
12033
ABdec
0X0
100
111
ref $args and ref $args eq 'HASH'
13750
Adec
00
11
$$properties{'alias'} || 'p'
1570
ABdec
0X0
100
111
not ref $item and @_ == 0
21620
ABCDdec
00XX0
01000
01011
011X1
1XXX1
not $$p{'colored'} or $$p{'colored'} eq 'auto' and exists $ENV{'ANSI_COLORS_DISABLED'} || $wantarray || !(-t $$p{'_output'})
23233
ABdec
0X0
100
111
$$p{'caller_info'} and $$p{'_depth'} == 0
27833
ABdec
0X0
100
111
not $found and &Scalar::Util::blessed($item)
30033
ABdec
0X0
100
111
$$p{'show_tied'} and $$p{'_tie'}
3300
ABdec
0X0
100
111
$$p{'show_tainted'} and &Scalar::Util::tainted($$item)
3350
ABdec
0X0
100
111
$$p{'show_readonly'} and &Internals::SvREADONLY($item)
3750
ABdec
0X0
100
111
$$p{'max_depth'} and $$p{'_depth'} > $$p{'max_depth'}
4010
ABdec
000
011
1X1
not $ref or $ref eq 'SCALAR'
4070
ABCdec
0XX0
10X0
1100
1111
$ref and &Scalar::Util::isweak($$item[$i]) and $$p{'show_weak'}
4110
ABdec
000
011
1X1
$i < $#{$item;} or $$p{'end_separator'}
44033
ABdec
0X0
100
111
&Scalar::Util::isweak($$item) and $$p{'show_weak'}
4660
ABdec
0X0
100
111
$$p{'max_depth'} and $$p{'_depth'} > $$p{'max_depth'}
4910
ABCdec
0XX0
1000
1011
11X1
$quote_keys and $quote_keys ne 'auto' || ($key eq '' || $new_key ne $key || $new_key =~ /\s|\n|\t|\r/)
5310
ABdec
000
011
1X1
not $ref or $ref eq 'SCALAR'
5380
ABCdec
0XX0
10X0
1100
1111
$ref and $$p{'show_weak'} and &Scalar::Util::isweak($$item{$raw_key})
5430
ABdec
000
011
1X1
--$total_keys > 0 or $$p{'end_separator'}
6660
ABdec
0X0
100
111
$$p{'class_method'} and my $method = $item->can($$p{'class_method'})
6820
ABdec
000
011
1X1
$$p{'class'}{'expand'} eq 'all' or $$p{'class'}{'expand'} >= $$p{'class'}{'_depth'}
7070
ABCdec
0XX0
1000
1011
11X1
$$p{'class'}{'linear_isa'} and $$p{'class'}{'linear_isa'} eq 'auto' && @superclasses > 1 || $$p{'class'}{'linear_isa'} ne 'auto'
7220
ABdec
0X0
100
111
$$p{'class'}{'show_methods'} and $$p{'class'}{'show_methods'} ne 'none'
7730
Adec
00
11
$$p{'class'}{'inherited'} || 'none'
7810
ABCDdec
0XXX0
10XX0
110X0
11100
11111
$_ and $m = B::svref_2object($_) and $m->isa('B::CV') and not $m->GV->isa('B::Special')
8070
ABCdec
0XX0
1000
1011
11X1
$inherited ne 'none' and $inherited eq 'all' || $type eq $inherited
8180
ABdec
000
011
1X1
$show_methods eq 'all' or $show_methods eq $type
86667
ABdec
000
011
1X1
$key eq 'color' or $key eq 'colour'
86833
ABdec
000
011
1X1
not ref $color or ref $color ne 'HASH'
9290
ABdec
0X0
100
111
not $ref and exists $output_target{lc $out}
0
ABCDdec
0X0X0
0X100
0X111
100X0
10100
10111
11XX1
$ref and $ref eq 'GLOB' or not $ref and (\$out) =~ /GLOB\([^()]+\)$/
0
ABdec
000
011
1X1
not $ref or $ref eq 'SCALAR'
96550
Adec
00
11
shift() || {}
97425
ABCdec
0XX0
1000
1011
11X1
not $^O =~ /Win32/i and $mode & 16 || $mode & 2
97914
ABCDEFdec
0000000
0000011
00001X1
0001XX1
001XXX1
01XXXX1
1XXXXX1
-l $file or not -f _ or -p _ or -S _ or -b _ or -c _
100733
ABdec
000
011
1X1
not ref $config or ref $config ne 'HASH'