Take me over?
The maintainer of this distribution is looking for someone to take over!
If you're interested then please contact them via
email.
NAME
Template::Plugin::ArrayRef - call object methods in array context and return it as arrayref
SYNOPSIS
[% USE ArrayRef %]
[% USE Dumper %]
[% PERL %]
$stash->set( get_zero => sub { () } );
$stash->set( get_one => sub { (1) } );
$stash->set( get_two => sub { (1, 2) } );
[% END %]
[% SET zero = get_zero %]
[% SET one = get_one %]
[% SET two = get_two %]
[% Dumper.dump(zero) %] # $VAR1 = '';
[% Dumper.dump(one) %] # $VAR1 = 1;
[% Dumper.dump(two) %] # $VAR1 = [ 1, 2 ];
[% SET zero = get_zero.list %]
[% SET one = get_one.list %]
[% SET two = get_two.list %]
[% Dumper.dump(zero) %] # $VAR1 = '';
[% Dumper.dump(one) %] # $VAR1 = [ 1 ];
[% Dumper.dump(two) %] # $VAR1 = [ 1, 2 ];
[% SET zero = ArrayRef.get_zero %]
[% SET one = ArrayRef.get_one %]
[% SET two = ArrayRef.get_two %]
[% Dumper.dump(zero) %] # $VAR1 = [];
[% Dumper.dump(one) %] # $VAR1 = [ 1 ];
[% Dumper.dump(two) %] # $VAR1 = [ 1, 2 ];
[% USE arrayref = ArrayRef %]
[% SET zero = arrayref.get_zero %]
[% SET one = arrayref.get_one %]
[% SET two = arrayref.get_two %]
[% Dumper.dump(zero) %] # $VAR1 = [];
[% Dumper.dump(one) %] # $VAR1 = [ 1 ];
[% Dumper.dump(two) %] # $VAR1 = [ 1, 2 ];
# in DBIC cases...
[% SET items = row.arrayref.items %]
[% SET items = row.items_rs.arrayref.all %]
AUTHOR
Tomohiro Hosaka <bokutin@bokut.in>
COPYRIGHT
Copyright (C) 2011 Tomohiro Hosaka. All Rights Reserved.
This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.