Branch Coverage

blib/lib/List/Compare.pm
Criterion Covered Total %
branch 248 248 100.0


line true false branch
14 89 123 if (@_ == 1 and ref $_[0] eq 'HASH') { }
17 1 88 unless exists do { $argref }->{'lists'}
20 2 86 unless do { $argref }->{'lists'} and ref do { $argref }->{'lists'} eq 'ARRAY'
22 33 53 do { $argref }->{'unsorted'} ? :
23 37 49 do { $argref }->{'accelerated'} ? :
26 56 67 $args[0] eq '-u' || $args[0] eq '--unsorted' ? :
28 65 58 if $args[0] eq '-a' or $args[0] eq '--accelerated'
33 195 14 if (ref $args[0] eq 'ARRAY' or ref $args[0] eq 'HASH') { }
35 16 323 unless (ref $nextarg eq ref $args[0])
43 30 179 unless $argument_error_status
47 43 136 if (@args > 2) { }
129 7 elsif (@args == 2) { }
48 22 21 if ($accelerated) { }
54 61 68 if ($accelerated)
64 87 85 $unsorted ? :
75 27 41 if (ref $refL eq 'HASH') { }
95 33 31 $unsortflag ? :
102 183 69 exists $seenR{$_} ? :
107 52 183 unless exists $intersection{$_}
112 20 44 if keys %LorRonly == 0
115 39 141 unless (exists $seenR{$_})
121 32 201 unless (exists $seenL{$_})
129 33 31 $unsortflag ? :
131 33 31 $unsortflag ? :
133 33 31 $unsortflag ? :
135 33 31 $unsortflag ? :
137 33 31 $unsortflag ? :
142 18 46 keys %intersection == 0 ? :
316 9 176 unless @_ == 1 and ref $_[0] ne 'ARRAY'
321 112 64 if (exists do { $data{'seenL'} }->{$arg})
322 112 64 if (exists do { $data{'seenR'} }->{$arg})
328 5 8 unless @_ == 1 and ref $_[0] eq 'ARRAY'
335 56 32 if (exists ${$data{'seenL'};}{$args[$i]})
336 56 32 if (exists ${$data{'seenR'};}{$args[$i]})
343 5 88 unless @_ == 1 and ref $_[0] ne 'ARRAY'
348 64 24 defined $data{'seenL'}{$arg} || defined $data{'seenR'}{$arg} ? :
353 5 8 unless @_ == 1 and ref $_[0] eq 'ARRAY'
360 64 24 defined $data{'seenL'}{$args[$i]} || defined $data{'seenR'}{$args[$i]} ? :
397 32 25 $unsortflag ? :
410 12 16 $data{'unsort'} ? :
422 16 16 $data{'unsort'} ? :
446 32 32 $data{'unsort'} ? :
471 32 32 $data{'unsort'} ? :
496 40 40 $data{'unsort'} ? :
569 9 176 unless @_ == 1 and ref $_[0] ne 'ARRAY'
577 5 8 unless @_ == 1 and ref $_[0] eq 'ARRAY'
587 5 88 unless @_ == 1 and ref $_[0] ne 'ARRAY'
595 5 8 unless @_ == 1 and ref $_[0] eq 'ARRAY'
610 8 8 if (ref $data{'L'} eq 'ARRAY') { }
612 4 4 $data{'unsort'} ? :
625 4 4 $data{'unsort'} ? :
639 96 64 if exists do { $hrefR }->{$_}
657 64 384 unless exists do { $hrefR }->{$_}
667 64 384 unless exists do { $hrefL }->{$_}
677 80 480 unless exists do { $hrefR }->{$_}
680 80 480 unless exists do { $hrefL }->{$_}
690 32 83 unless (exists do { $hrefR }->{$_})
703 22 119 unless (exists do { $hrefL }->{$_})
722 112 40 if exists do { $hrefR }->{$_}
724 6 24 keys %intersection == 0 ? :
732 8 26 unless (exists do { $hrefR }->{$_})
738 8 23 unless (exists do { $hrefL }->{$_})
761 112 64 if (exists do { $hrefL }->{$arg})
762 112 64 if (exists do { $hrefR }->{$arg})
773 56 32 if (exists ${$hrefL;}{$args[$i]})
774 56 32 if (exists ${$hrefR;}{$args[$i]})
783 64 24 defined do { $hrefL }->{$arg} || defined do { $hrefR }->{$arg} ? :
793 64 24 defined ${$hrefL;}{$args[$i]} || defined ${$hrefR;}{$args[$i]} ? :
817 10 11 if (ref $listrefs[0] eq 'ARRAY') { }
836 11 8 unless $unsortflag
885 598 340 if exists $seenthis{$_}
890 8 11 $unsortflag ? :
903 236 296 if exists $intersection{$_}
907 8 11 $unsortflag ? :
912 186 21 unless exists $intersection{$_}
924 446 783 if ($left == $i or $right == $i)
928 240 989 !keys(%{$xintersection{$_};}) ? :
936 61 455 unless $alldeductions{$_}
950 617 516 unless exists $seenthis{$_}
963 8 11 $unsortflag ? :
965 61 146 unless exists $shared{$_}
976 1096 1712 unless $tempj{$_}
986 137 39 if $xsubset[$f][$g] and $xsubset[$g][$f]
1041 24 12 defined $_[0] ? :
1048 65 12 defined $_[0] ? :
1084 20 24 defined $_[0] ? :
1091 69 24 defined $_[0] ? :
1224 9 176 unless @_ == 1 and ref $_[0] ne 'ARRAY'
1231 432 448 if exists $seen{$_}{$arg}
1238 5 8 unless @_ == 1 and ref $_[0] eq 'ARRAY'
1248 216 224 exists ${$seen{$_};}{$args[$i]} ? :
1251 8 80 if @not_found == keys %seen
1258 5 88 unless @_ == 1 and ref $_[0] ne 'ARRAY'
1265 80 110 if defined $seen{$k}{$arg}
1272 5 8 unless @_ == 1 and ref $_[0] eq 'ARRAY'
1280 168 272 unless (defined $present{$args[$i]})
1281 80 88 if $seen{$_}{$args[$i]}
1284 8 80 unless defined $present{$args[$i]}
1349 14 8 $unsortflag ? :
1364 8 8 $unsortflag ? :
1379 8 8 $unsortflag ? :
1397 128 32 unless exists $intermediate_ref->{$el}
1399 8 8 $unsortflag ? :
1413 8 8 $unsortflag ? :
1433 128 512 unless exists $sharedref->{$el}
1435 32 32 $unsortflag ? :
1469 24 12 defined $_[0] ? :
1476 65 12 defined $_[0] ? :
1516 20 24 defined $_[0] ? :
1523 69 24 defined $_[0] ? :
1607 16 39 if ($aseenref->[1]{$k})
1621 9 176 unless @_ == 1 and ref $_[0] ne 'ARRAY'
1629 432 448 if exists do { $seenref }->{$_}{$arg}
1636 5 8 unless @_ == 1 and ref $_[0] eq 'ARRAY'
1647 216 224 exists ${${$seenref;}{$_};}{$args[$i]} ? :
1650 8 80 if @not_found == keys %{$seenref;}
1657 5 88 unless @_ == 1 and ref $_[0] ne 'ARRAY'
1665 80 107 if defined do { $seenref }->{$k}{$arg}
1672 5 8 unless @_ == 1 and ref $_[0] eq 'ARRAY'
1681 179 261 unless (defined $present{$args[$i]})
1682 80 99 if do { $seenref }->{$_}{$args[$i]}
1685 8 80 unless defined $present{$args[$i]}
1719 8 8 if (ref $listrefs[0] eq 'ARRAY') { }
1734 8 8 unless $unsortflag