これの後半のところで使おうとして、毎回迷ってるなぁって思ったから、メモ代わりに。 https://gist.github.com/t12968yy/8621f304c76c790caa46 my $tree; for { push @{$tree}, $hoge; } foreach my $factor ( @{ $tree } ) { print $factor."¥n"; }