Branch Coverage

blib/lib/Math/Random/MT/Perl.pm
Criterion Covered Total %
branch 24 26 92.3


line true false branch
31 16 20 if (ref $self) { }
36 1 19 unless defined $gen
45 16 8 if (ref $self) { }
49 0 8 unless defined $gen
68 14 2 defined $seeds[0] ? :
3 16 @seeds > 1 ? :
78 7 3 unless (@seeds)
127 3 0 $N > $n ? :
135 3 1869 if ($i >= $N)
136 468 1404 if ($j >= $n)
143 3 1866 if ($i >= $N)
161 12 48 if ($self->{'mti'} >= $N)
187 7 10 if $sym eq 'srand' or $sym eq 'rand' or $sym eq 'irand'