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 = '1.000';
3 2     2   178125 use strict;
  2         4  
  2         73  
4 2     2   10 use warnings;
  2         2  
  2         102  
5              
6 2     2   9 use Exporter qw(import);
  2         2  
  2         88  
7 2     2   918 use Data::ULID qw(:all);
  2         29946  
  2         463  
8              
9 2     2   17 use Time::HiRes qw();
  2         3  
  2         27  
10 2     2   945 use Crypt::PRNG qw();
  2         10256  
  2         204  
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__