[ Mini Kiebo ]

Server: Windows NT DESKTOP-5B8S0D4 6.2 build 9200 (Windows 8 Professional Edition) i586 Path: D:/xampp182/perl/vendor/lib/Parse/Method/Signatures/ [ Home ]

File: ParamCollection.pm

package Parse::Method::Signatures::ParamCollection;

use Moose;
use MooseX::Types::Moose qw/ArrayRef/;
use Parse::Method::Signatures::Types qw/Param/;

use namespace::clean -except => 'meta';

has params => (
    is         => 'ro',
    isa        => ArrayRef[Param],
    required   => 1,
    auto_deref => 1,
);

sub to_string {
    my ($self) = @_;
    return join(q{, }, map { $_->to_string } $self->params);
}

1;