Branch Coverage

blib/lib/Class/Random.pm
Criterion Covered Total %
branch 10 14 71.4


line true false branch
15 3 3 if ($$self{'mode'} eq 'choose') { }
3 0 elsif ($$self{'mode'} eq 'shuffle') { }
31 0 3 unless @_ > 3
35 2 1 if ($mode eq 'choose' or $mode eq 'shuffle') { }
1 0 elsif ($mode eq 'subclass') { }
36 1 1 if ($mode eq 'choose')
38 0 2 unless ref $_ eq 'ARRAY'