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.

SEE ALSO

Template::Plugin::Scalar