Perl で手軽にイタレータっぽいことをやりたいんだが うぅむ、呼出し元にて丸括弧の中に中括弧があるのが、みっともないなぁ。もっと美しい書き方は無いものか。で、dankogai氏のページを見た: 404 Blog Not Found:perl - for(1..1e10) と Iterator というのを見て、プロトタイプ宣言してやれば map とかみたいにコードブロック渡せるんじゃないか?とおもってやってみたら無理だったという話。 多分、元々やりたいことはRubyのiteratorみたいに $sar->each { my ($time, $p) = @_; print ("$time : $p\n"); }; こんな風に書けるメソッドを書きたいということだろうと思う。 でも↓のbad_eachでは期待したようには動かない 勉強不足で知らなかったのだけど、コードブロック