File Coverage

lib/List/Objects/WithUtils/Array.pm
Criterion Covered Total %
statement 7 7 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
total 10 10 100.0


line stmt bran cond sub code
1         package List::Objects::WithUtils::Array;
2 93     93 use strictures 1;
  93        
  93        
3          
4         require Role::Tiny;
5         Role::Tiny->apply_roles_to_package( __PACKAGE__,
6           qw/
7         List::Objects::WithUtils::Role::Array
8         List::Objects::WithUtils::Role::Array::WithJunctions
9         /
10         );
11          
12 93     93 use Exporter 'import';
  93        
  93        
13         our @EXPORT = 'array';
14 223     223 sub array { __PACKAGE__->new(@_) }
15          
16         1;
17          
18         =pod
19        
20         =head1 NAME
21        
22         List::Objects::WithUtils::Array - Array-type objects WithUtils
23        
24         =head1 SYNOPSIS
25        
26         use List::Objects::WithUtils 'array';
27        
28         my $array = array(qw/ a b c /);
29        
30         =head1 DESCRIPTION
31        
32         This class is the basic concrete implementation of
33         L<List::Objects::WithUtils::Role::Array>. Methods are documented there.
34        
35         This class also consumes
36         L<List::Objects::WithUtils::Role::Array::WithJunctions>, which adds the
37         B<any_items> & B<all_items> junction-returning methods; see the POD for
38         L<List::Objects::WithUtils::Role::Array::WithJunctions> and
39         L<List::Objects::WithUtils::Array::Junction> for details.
40        
41         =head2 array
42        
43         Creates a new array object.
44        
45         =head1 AUTHOR
46        
47         Jon Portnoy <avenj@cobaltirc.org>
48        
49         Derived from L<Data::Perl> by Matt Phillips (CPAN: MATTP) et al
50        
51         Licensed under the same terms as Perl
52        
53         =cut
54