subtechグループ - tokuhirom@株主の日記 - first

http://subtech.g.hatena.ne.jp/tokuhirom/20051119/1132404752

• $feed_url = (grep {$_->rel eq 'next'} @links)[0]->href;

1. use List::Utils;
2. $feed_url = (first {$_->rel eq 'next'} @links)->href;

俺はこっちの方が好き。どっちでもいいんだけどさ。「オレは最初の一個を取りたいんだぜ感」が強調されるので。

List::Util 便利。

1. first EXPR LIST
2. last EXPR LIST
3. max LIST
4. reduce EXPR($a,$b) LIST # foldlと同じ [2005-10-24]