■
perl TT chunk
TTのchunkってメソッド。
use strict; use warnings; use Template; my $data = join("",<DATA>); my $template = Template->new({}); $template->process( \$data, { hoge => 123456, } ) || die; __END__ [%- FOR v IN hoge.chunk(2) %] [% v %] [%- END -%]
結果こんなん
12
34
56
http://search.cpan.org/~abw/Template-Toolkit/lib/Template/Manual/VMethods.pod