blib/lib/Crypt/HSXKPasswd/RNG/DevUrandom.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 0 | 4 | 0.0 |
line | true | false | branch |
---|---|---|---|
55 | 0 | 0 | unless (-e '/dev/urandom') |
126 | 0 | 0 | unless (eval { do { &Crypt::HSXKPasswd::RNG::DevUrandom::open(my $DEV_URANDOM_FH, '<:raw', '/dev/urandom'); &Crypt::HSXKPasswd::RNG::DevUrandom::sysread($DEV_URANDOM_FH, \my $rand_wip, 4); my $rand_long = unpack('L', $rand_wip); &Crypt::HSXKPasswd::RNG::DevUrandom::close($DEV_URANDOM_FH); $rand = $rand_long / 4294967296 } }) |