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.003';
3 2     2   136716 use strict;
  2         13  
  2         58  
4 2     2   10 use warnings;
  2         3  
  2         52  
5              
6 2     2   13 use Exporter qw(import);
  2         3  
  2         95  
7 2     2   1060 use Data::ULID qw(:all);
  2         18744  
  2         270  
8              
9 2     2   14 use Time::HiRes qw();
  2         15  
  2         34  
10 2     2   991 use Crypt::PRNG::Sober128 qw();
  2         1199  
  2         188  
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::Sober128->new;
17              
18             require XSLoader;
19             XSLoader::load('Data::ULID::XS', $Data::ULID::XS::VERSION);
20              
21             1;
22             __END__