Condition Coverage
blib/lib/Shannon/Entropy.pm
Criterion
Covered
Total
%
condition
3
3
100.0
and 3 conditions
line
!l
l&&!r
l&&r
condition
19
1
1
3
map({$p = $_ / $len; $entropy -= $p * log($p);} map({$t{$_}++;} split(//, $_[0], 0)) ? values %t : ()) && $entropy / 0.69314718055994529