04/05/14 10:00
それは>>691,>>692で書かれているようにmapの戻り値がいらないことを
処理系が判断できないので戻り値の配列を作ってしまっているから。
foreach版と同じことをさせてるならmapの戻り値はいらないはずなので
'map' => sub {
map {
my $xx = $_;
map { my $yy = "$xx-$_" } @bb;
1;
} @aa;
1;
},
としてみ。逆転すると思うよ。
04/05/14 10:00
それは>>691,>>692で書かれているようにmapの戻り値がいらないことを
処理系が判断できないので戻り値の配列を作ってしまっているから。
foreach版と同じことをさせてるならmapの戻り値はいらないはずなので
'map' => sub {
map {
my $xx = $_;
map { my $yy = "$xx-$_" } @bb;
1;
} @aa;
1;
},
としてみ。逆転すると思うよ。