Branch Coverage

blib/lib/Statistics/Basic/Mode.pm
Criterion Covered Total %
branch 12 24 50.0


line true false branch
14 0 1 unless defined(my $q = $_[0]->query)
15 1 0 if ref $q
20 0 0 if ref $q
28 0 4 if $Statistics::Basic::DEBUG >= 2
31 0 4 unless my $vector = eval { do { 'Statistics::Basic::Vector'->new(@_) } }
32 0 4 if defined $c
48 0 7 unless $cardinality > 0
49 0 7 unless $v->query_filled
57 19 32 if $t > $max
61 3 4 @a == 1 ? :
63 0 7 if $Statistics::Basic::DEBUG
72 0 0 blessed $that ? :