File Coverage

blib/lib/Data/ULID/XS.pm
Criterion Covered Total %
statement 18 18 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod n/a
total 24 24 100.0


line stmt bran cond sub pod time code
1             package Data::ULID::XS;
2             $Data::ULID::XS::VERSION = '0.005';
3 2     2   137339 use strict;
  2         14  
  2         64  
4 2     2   9 use warnings;
  2         5  
  2         65  
5              
6 2     2   10 use Exporter qw(import);
  2         3  
  2         99  
7 2     2   990 use Data::ULID qw(:all);
  2         17301  
  2         319  
8              
9 2     2   19 use Time::HiRes qw();
  2         4  
  2         78  
10 2     2   14 use Crypt::PRNG qw();
  2         4  
  2         213  
11              
12             our @EXPORT = @Data::ULID::EXPORT;
13             our @EXPORT_OK = @Data::ULID::EXPORT_OK;
14             our %EXPORT_TAGS = %Data::ULID::EXPORT_TAGS;
15              
16             our $RNG = Crypt::PRNG->new('Sober128');
17              
18             require XSLoader;
19             XSLoader::load('Data::ULID::XS', $Data::ULID::XS::VERSION);
20              
21             1;
22             __END__