http://www.perlmonks.org?node_id=82826


in reply to Subroutine chaining idiom requested

use List::Util qw(reduce); # unnecessary in in Perl 6 {grin}
my @result = reduce { [$b->{@$a}] } [], @$agenda;

[download]
Or, without that: 
my @result;
@result = $_->(@result) for @$agenda;

[download]

-- Randal L. Schwartz, Perl hacker

In Section Seekers of Perl Wisdom