>>900
まあ確かにそっちのコードの方が筋はいいか…。
でもmap()使う方法もあるってのはそんなに無駄な情報でもないと思うけど。
あとは好みでいいんでないのかねえ。

ついでに試しにベンチ取ってみたらmap()もforもほとんど変わらなかった。
返り値処理が無駄になる割にはmap()の方が微妙に速い。1〜4%程度だが。
そのへんはPerlのバージョンにもよるかもだけど。(v5.14.2)