Branch Coverage

blib/lib/Sort/Sub/by_perl_code.pm
Criterion Covered Total %
branch 8 12 66.6


line true false branch
35 0 6 unless defined $code
38 3 3 if (ref $code ne 'CODE')
40 0 3 if $@
47 0 16 @_ ? :
48 0 16 @_ ? :
51 4 12 $is_reverse ? :