File Coverage

blib/lib/Mongol/Roles/UUID.pm
Criterion Covered Total %
statement 9 9 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 12 12 100.0


line stmt bran cond sub pod time code
1             package Mongol::Roles::UUID;
2              
3 1     1   2668 use Moose::Role;
  1         2  
  1         10  
4              
5 1     1   5942 use Data::UUID;
  1         566  
  1         78  
6              
7             requires '_build_id';
8              
9             around '_build_id' => sub {
10             return Data::UUID->new()
11             ->create_str();
12             };
13              
14 1     1   5 no Moose::Role;
  1         1  
  1         5  
15              
16             1;
17              
18             __END__
19              
20             =pod
21              
22             =head1 NAME
23              
24             Mongol::Roles::UUID - UUID as object identifier
25              
26             =head1 SYNOPSIS
27              
28             =head1 DESCRIPTION
29              
30             Using UUID instead of Mongo OnjectID.
31              
32             =head1 SEE ALSO
33              
34             =over 4
35              
36             =item *
37              
38             L<Data::UUID>
39              
40             =back
41              
42             =cut