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   11 use Moose;
  3         6  
  3         16  
4 3     3   14299 use MooseX::Types::Moose qw/ArrayRef/;
  3         5  
  3         27  
5 3     3   11018 use Parse::Method::Signatures::Types qw/Param/;
  3         8  
  3         13  
6              
7 3     3   4511 use namespace::clean -except => 'meta';
  3         4  
  3         21  
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 159 my ($self) = @_;
18 103         2901 return join(q{, }, map { $_->to_string } $self->params);
  150         1084  
19             }
20              
21             1;