File Coverage

blib/lib/Parse/Method/Signatures/ParamCollection.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 0 1 0.0
total 20 21 95.2


line stmt bran cond sub pod time code
1             package Parse::Method::Signatures::ParamCollection;
2              
3 3     3   12 use Moose;
  3         6  
  3         20  
4 3     3   13441 use MooseX::Types::Moose qw/ArrayRef/;
  3         6  
  3         30  
5 3     3   10576 use Parse::Method::Signatures::Types qw/Param/;
  3         9  
  3         13  
6              
7 3     3   4178 use namespace::clean -except => 'meta';
  3         5  
  3         19  
8              
9             has params => (
10             is => 'ro',
11             isa => ArrayRef[Param],
12             required => 1,
13             auto_deref => 1,
14             );
15              
16             sub to_string {
17 103     103 0 182 my ($self) = @_;
18 103         2950 return join(q{, }, map { $_->to_string } $self->params);
  150         1005  
19             }
20              
21             1;