2 package Moose::Autobox::List;
3 use Moose::Role 'with', 'requires';
8 with 'Moose::Autobox::Value';
22 my ($array, $func) = @_;
23 my $a = $array->values;
25 $a->tail->map(sub { $acc = $func->($acc, $_) });
30 my ($array, $other) = @_;
31 ($array->length < $other->length
36 [ $array->at($_), $other->at($_) ]
48 Moose::Autobox::List - the List role
52 This is a role to describes a List interface. This is not
53 meant to be any specific Perl type, but instead an interface
54 that certain Perl types might implement. Currenly only
55 L<Moose::Autobox::Array> implements this.
73 =head1 REQUIRED METHODS
97 All complex software has bugs lurking in it, and this module is no
98 exception. If you find a bug please either email me, or add the bug
103 Stevan Little E<lt>stevan@iinteractive.comE<gt>
105 =head1 COPYRIGHT AND LICENSE
107 Copyright 2006 by Infinity Interactive, Inc.
109 L<http://www.iinteractive.com>
111 This library is free software; you can redistribute it and/or modify
112 it under the same terms as Perl itself.