Branch Coverage

blib/lib/Math/Random/MT/Perl.pm
Criterion Covered Total %
branch 22 24 91.6


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 3 14 @seeds > 1 ? :
78 7 2 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'