サクサク読めて、アプリ限定の機能も多数！
allとかanyとかnoneの再発明(幾分大味)を試してみたらreduce便利すぎ 「sub all {my ($f, ＠xs) = ＠_;reduce {$a and $f->($b)} 1, ＠xs} sub any {my ($f, ＠xs) = ＠_;reduce {$a or $f->($b)} 0, ＠xs} sub none {my ($f, ＠xs) = ＠_;!reduce {$a or $f->($b)} 0, ＠xs}」
kiyo_hiko のブックマーク 2011/10/27 19:09
このブックマークにはスターがありません。 最初のスターをつけてみよう！
sonic64.com2005/10/13
Landscape トップページ | < 前の日 2004-11-13 2004-11-14 次の日 2004-11-15 > Landscape - エンジニアのメモ 2004-11-14 List::Util Perl 標準の配列操作ライブラリ 当サイト内を Google 検索できます * List:...
22 人がブックマーク・5 件のコメント
＼ コメントが サクサク読める アプリです ／
allとかanyとかnoneの再発明(幾分大味)を試してみたらreduce便利すぎ 「sub all {my ($f, ＠xs) = ＠_;reduce {$a and $f->($b)} 1, ＠xs} sub any {my ($f, ＠xs) = ＠_;reduce {$a or $f->($b)} 0, ＠xs} sub none {my ($f, ＠xs) = ＠_;!reduce {$a or $f->($b)} 0, ＠xs}」
このブックマークにはスターがありません。
最初のスターをつけてみよう！
List::Util Perl 標準の配列操作ライブラリ
Landscape トップページ | < 前の日 2004-11-13 2004-11-14 次の日 2004-11-15 > Landscape - エンジニアのメモ 2004-11-14 List::Util Perl 標準の配列操作ライブラリ 当サイト内を Google 検索できます * List:...
22 人がブックマーク・5 件のコメント
＼ コメントが サクサク読める アプリです ／