Branch Coverage

blib/lib/Random/Simple.pm
Criterion Covered Total %
branch 22 44 50.0


line true false branch
48 0 11 if ($debug)
52 0 11 if ($seed1 == 0 and $seed2 == 0)
66 0 12 if ($count <= 0)
70 0 12 if ($^O eq 'MSWin32') { }
12 0 elsif (-r '/dev/urandom') { }
73 0 0 unless state $rand = "Win32::API"->new("advapi32", "INT SystemFunction036(PVOID RandomBuffer, ULONG RandomBufferLength)")
79 0 0 unless $rand->Call($ret, $count)
81 9 3 unless ($URANDOM_FH)
82 0 9 unless open $URANDOM_FH, "<:raw", "/dev/urandom"
85 0 12 unless sysread $URANDOM_FH, $ret, $count
90 0 12 if (length $ret != $count)
130 0 9 if (length $bytes != 16)
146 0 9 if ($debug)
150 0 9 if ($seed1 == 0 and $seed2 == 0)
168 0 6 if ($num < 0)
193 0 100008 if ($max < $min)
199 0 100008 if ($range > 4294967294) { }
214 10000 0 if ($has_64bit) { }
229 0 10000 unless (@arr)
242 0 1 unless (@array)
267 2 2 unless ($seed)
300 30029 0 if ($has_64bit) { }