Branch Coverage

blib/lib/Hub/Perl/Compare.pm
Criterion Covered Total %
branch 1 22 4.5


line true false branch
90 0 0 unless my $comparator = shift()
91 0 0 unless defined $COMPARISONS{$comparator}
94 0 0 defined $_[1] ? :
0 0 !defined($_[1]) ? :
0 0 defined $_[0] ? :
107 0 0 unless my $comparator = shift()
108 0 0 unless defined $COMPARISONS{$comparator}
111 0 0 defined $_[1] ? :
0 0 defined $_[1] ? :
0 0 defined $_[0] ? :
123 0 54 if can($_[0], 'get_data')