Branch Coverage

blib/lib/Crypt/Random/Provider/Win32API.pm
Criterion Covered Total %
branch 1 18 5.5


line true false branch
27 0 0 unless ref $self
33 0 0 if ($size and ref $size eq "Math::Pari")
40 0 0 if (eval { do { require Win32::API } }) { }
41 0 0 unless my $genrand = "Win32::API"->new("advapi32", "INT SystemFunction036(PVOID RandomBuffer, ULONG RandomBufferLength)")
46 0 0 if $count == 0
47 0 0 if not defined $bytes or $bytes =~ /\D/
49 0 0 unless $genrand->Call($buffer, $count)
60 0 0 if $skip
70 0 5 if (eval { do { require Win32::API } }) { }