Condition Coverage

lib/Data/Compare.pm
Criterion Covered Total %
condition 48 69 69.5


and 3 conditions

line !l l&&!r l&&r condition
125 1151 1248 20 ref $x and exists $Data::Compare::been_there{"$x-$xpos-$xparent"}
2399 14 6 ref $x and exists $Data::Compare::been_there{"$x-$xpos-$xparent"} and $Data::Compare::been_there{"$x-$xpos-$xparent"} > 1
1156 1243 14 ref $y and exists $Data::Compare::been_there{"$y-$ypos-$yparent"}
2399 14 0 ref $y and exists $Data::Compare::been_there{"$y-$ypos-$yparent"} and $Data::Compare::been_there{"$y-$ypos-$yparent"} > 1
142 1262 1151 0 exists $handler{$refx} and exists $handler{$refx}{$refy}
1257 1156 0 exists $handler{$refy} and exists $handler{$refy}{$refx}
149 4 0 1147 defined $x and defined $y
183 5 6 153 defined $y->{$_} and _Compare($x->{$_}, $y->{$_}, {%{$opts;}, 'xparent', $x, 'xpos', $_, 'yparent', $y, 'ypos', $_})

or 3 conditions

line l !l&&r !l&&!r condition
30 0 0 25 &tainted(scalar getcwd()) or not chdir $cwd
65 0 0 26 not defined $type1 or ref $type1 ne ''
0 0 26 not defined $type1 or ref $type1 ne '' or not defined $type2
0 0 26 not defined $type1 or ref $type1 ne '' or not defined $type2 or ref $type2 ne ''
80 0 3 0 ref $this || $this
91 5 2 0 $#_ == 1 or $#_ == -1
92 5 1 1 shift() || $self->{'x'}
93 5 1 1 shift() || $self->{'y'}
99 1065 7 0 $#_ == 1 or $#_ == 2
125 6 0 2413 ref $x and exists $Data::Compare::been_there{"$x-$xpos-$xparent"} and $Data::Compare::been_there{"$x-$xpos-$xparent"} > 1 or ref $y and exists $Data::Compare::been_there{"$y-$ypos-$yparent"} and $Data::Compare::been_there{"$y-$ypos-$yparent"} > 1
142 1262 0 1151 $refx || $refy
4 18 1218 $refx eq 'SCALAR' or $refx eq 'REF'
151 0 2 2 defined $x || defined $y
182 164 0 2 defined $x->{$_} or defined $y->{$_}
197 2 0 2 $type eq 'SCALAR' or $type eq 'REF'