File Coverage

blib/lib/Crypt/Random/Provider/devurandom.pm
Criterion Covered Total %
statement 13 13 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 18 18 100.0


line stmt bran cond sub pod time code
1             ##
2             ## Copyright (c) 1998-2025, Vipul Ved Prakash. All rights reserved.
3             ## This code is free software; you can redistribute it and/or modify
4             ## it under the same terms as Perl itself.
5              
6             our $VERSION = '1.57';
7              
8 4     4   30 use strict;
  4         8  
  4         217  
9 4     4   23 use warnings;
  4         17  
  4         386  
10             package Crypt::Random::Provider::devurandom;
11 4     4   4304 use Crypt::Random::Provider::File;
  4         19  
  4         167  
12 4     4   29 use vars qw(@ISA);
  4         10  
  4         447  
13             @ISA = qw(Crypt::Random::Provider::File);
14              
15 2405     2405   37700 sub _defaultsource { return "/dev/urandom" }
16              
17             1;
18