File Coverage

blib/lib/Catmandu/IdGenerator/UUID.pm
Criterion Covered Total %
statement 13 13 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 0 1 0.0
total 18 19 94.7


line stmt bran cond sub pod time code
1              
2             use Catmandu::Sane;
3 21     21   97492  
  21         47  
  21         113  
4             our $VERSION = '1.2018';
5              
6             use UUID::Tiny qw(:std);
7 21     21   9956 use Moo;
  21         222730  
  21         3559  
8 21     21   172 use namespace::clean;
  21         42  
  21         132  
9 21     21   7565  
  21         46  
  21         139  
10             with 'Catmandu::IdGenerator';
11              
12             create_uuid_as_string(UUID_V1);
13             }
14 108     108 0 10064  
15             1;
16              
17              
18             =pod
19              
20             =head1 NAME
21              
22             Catmandu::IdGenerator::UUID - Generator of UUID identifiers
23              
24             =head1 SYNOPSIS
25              
26             use Catmandu::IdGenerator::UUID;
27              
28             my $x = Catmandu::IdGenerator::UUID->new;
29              
30             for (1..100) {
31             printf "id: %s\n" , $x->generate;
32             }
33              
34             =head1 DESCRIPTION
35              
36             This L<Catmandu::IdGenerator> generates identifiers based on the Universally
37             Unique Identifier (UUID) v1 standard. A UUID string is a 128 bit number
38             represented by lowercase hexadecimal digits such as
39             C<de305d54-75b4-431b-adb2-eb6b9e546014>.
40              
41             =cut