Branch Coverage

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 } })