File Coverage

blib/lib/Dist/Zilla/Util/RoleDB/Items.pm
Criterion Covered Total %
statement 16 16 100.0
branch 1 2 50.0
condition n/a
subroutine 5 5 100.0
pod 1 1 100.0
total 23 24 95.8


line stmt bran cond sub pod time code
1 3     3   471 use 5.006;
  3         7  
2 3     3   14 use strict;
  3         3  
  3         84  
3 3     3   13 use warnings;
  3         5  
  3         509  
4              
5             package Dist::Zilla::Util::RoleDB::Items;
6              
7             our $VERSION = '0.004001';
8              
9             # ABSTRACT: An aggregate provisioned index of roles
10              
11             our $AUTHORITY = 'cpan:KENTNL'; # AUTHORITY
12              
13             my @items;
14              
15              
16              
17              
18              
19              
20              
21              
22              
23             sub all {
24 2 50   2 1 7 return @items if @items;
25 2         4 _add_items();
26 2         48 return @items;
27             }
28              
29             sub _add_items {
30 2     2   897 require Dist::Zilla::Util::RoleDB::Items::Core;
31 2         44 push @items, Dist::Zilla::Util::RoleDB::Items::Core->all;
32 2         1133 require Dist::Zilla::Util::RoleDB::Items::ThirdParty;
33 2         11 push @items, Dist::Zilla::Util::RoleDB::Items::ThirdParty->all;
34 2         5 return;
35             }
36             1;
37              
38             __END__
39              
40             =pod
41              
42             =encoding UTF-8
43              
44             =head1 NAME
45              
46             Dist::Zilla::Util::RoleDB::Items - An aggregate provisioned index of roles
47              
48             =head1 VERSION
49              
50             version 0.004001
51              
52             =head1 METHODS
53              
54             =head2 C<all>
55              
56             Returns all items in this item set, as a list
57              
58             my @entries = $class->all();.
59              
60             =head1 AUTHOR
61              
62             Kent Fredric <kentnl@cpan.org>
63              
64             =head1 COPYRIGHT AND LICENSE
65              
66             This software is copyright (c) 2017 by Kent Fredric <kentfredric@gmail.com>.
67              
68             This is free software; you can redistribute it and/or modify it under
69             the same terms as the Perl 5 programming language system itself.
70              
71             =cut