Mojo::Collection
Collection
Collection
use Mojo::Collection;
# Manipulate collection
my $collection = Mojo::Collection->new(qw(just works));
unshift @$collection, 'it';
say $collection->join("\n");
# Chain methods
$collection->map(sub { ucfirst })->shuffle->each(sub {
my ($word, $num) = @_;
say "$num: $word";
});
# Use the alternative constructor
use Mojo::Collection 'c';
c(qw(a b c))->join('/')->url_escape->say;
Mojo::Collection is an array-based container for collections.
# Access array directly to manipulate collection my $collection = Mojo::Collection->new(1 .. 25); $collection->[23] += 100; say for @$collection;
Mojo::Collection implements the following functions, which can be imported individually.
my $collection = c(1, 2, 3);
Construct a new array-based Mojo::Collection object.
Mojo::Collection implements the following methods.
my $array = $collection->TO_JSON;
Alias for "to_array".
my $new = $collection->compact;
Create a new collection with all elements that are defined and not an empty string.
# "0, 1, 2, 3"
Mojo::Collection->new(0, 1, undef, 2, '', 3)->compact->join(', ');
my @elements = $collection->each;
$collection = $collection->each(sub {...});
Evaluate callback for each element in collection or return all elements as a list if none has been provided. The element will be the first argument passed to the callback and is also available as $_.
# Make a numbered list
$collection->each(sub {
my ($e, $num) = @_;
say "$num: $e";
});
my $first = $collection->first;
my $first = $collection->first(qr/foo/);
my $first = $collection->first(sub {...});
Evaluate regular expression or callback for each element in collection and return the first one that matched the regular expression, or for which the callback returned true. The element will be the first argument passed to the callback and is also available as $_.
# Find first value that contains the word "mojo"
my $interesting = $collection->first(qr/mojo/i);
# Find first value that is greater than 5
my $greater = $collection->first(sub { $_ > 5 });
my $new = $collection->flatten;
Flatten nested collections/arrays recursively and create a new collection with all elements.
# "1, 2, 3, 4, 5, 6, 7"
Mojo::Collection->new(1, [2, [3, 4], 5, [6]], 7)->flatten->join(', ');
my $new = $collection->grep(qr/foo/);
my $new = $collection->grep(sub {...});
Evaluate regular expression or callback for each element in collection and create a new collection with all elements that matched the regular expression, or for which the callback returned true. The element will be the first argument passed to the callback and is also available as $_.
# Find all values that contain the word "mojo"
my $interesting = $collection->grep(qr/mojo/i);
# Find all values that are greater than 5
my $greater = $collection->grep(sub { $_ > 5 });
my $stream = $collection->join;
my $stream = $collection->join("\n");
Turn collection into Mojo::ByteStream.
# Join all values with commas
$collection->join(', ')->say;
my $last = $collection->last;
Return the last element in collection.
my $new = $collection->map(sub {...});
my $new = $collection->map($method);
my $new = $collection->map($method, @args);
Evaluate callback for, or call method on, each element in collection and create a new collection from the results. The element will be the first argument passed to the callback and is also available as $_.
# Longer version
my $new = $collection->map(sub { $_->$method(@args) });
# Append the word "mojo" to all values
my $mojoified = $collection->map(sub { $_ . 'mojo' });
my $collection = Mojo::Collection->new(1, 2, 3);
Construct a new array-based Mojo::Collection object.
my $result = $collection->reduce(sub {...});
my $result = $collection->reduce(sub {...}, $initial);
Reduce elements in collection with callback, the first element will be used as initial value if none has been provided.
# Calculate the sum of all values
my $sum = $collection->reduce(sub { $a + $b });
# Count how often each value occurs in collection
my $hash = $collection->reduce(sub { $a->{$b}++; $a }, {});
my $new = $collection->reverse;
Create a new collection with all elements in reverse order.
my $new = $collection->slice(4 .. 7);
Create a new collection with all selected elements.
# "B C E"
Mojo::Collection->new('A', 'B', 'C', 'D', 'E')->slice(1, 2, 4)->join(' ');
my $new = $collection->shuffle;
Create a new collection with all elements in random order.
my $size = $collection->size;
Number of elements in collection.
my $new = $collection->sort;
my $new = $collection->sort(sub {...});
Sort elements based on return value of callback and create a new collection from the results.
# Sort values case-insensitive
my $case_insensitive = $collection->sort(sub { uc($a) cmp uc($b) });
$collection = $collection->tap(sub {...});
Alias for "tap" in Mojo::Base.
my $array = $collection->to_array;
Turn collection into array reference.
my $new = $collection->uniq;
Create a new collection without duplicate elements.
# "foo bar baz"
Mojo::Collection->new('foo', 'bar', 'bar', 'baz')->uniq->join(' ');
Mojolicious, Mojolicious::Guides, <http://mojolicio.us>.