reduceの解釈
List::Utilのreduce()が何をするかやっと分かった気がする。
http://perl-users.jp/articles/advent-calendar/2008/20.html
でもって、reduce は初期要素、つまり $a の最初の値を指定できます。
つまりこういうことだね。
package Foo; use Moose; use List::Util qw(reduce); # ...中略... reduce { $a -> $b } __PACKAGE__, meta => make_immutable => ; __END__