エントリーの編集
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
記事へのコメント0件
- 注目コメント
- 新着コメント
このエントリーにコメントしてみましょう。
注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています
- バナー広告なし
- ミュート機能あり
- ダークモード搭載
関連記事
使い方 - cooldaemonの備忘録
Perl Best Practices ネタ。 ソートを行う際、同じ引数を与えた場合、結果が同じとなる関数を利用する場... Perl Best Practices ネタ。 ソートを行う際、同じ引数を与えた場合、結果が同じとなる関数を利用する場合・・・ my @numbers = ( 1 .. 100 ); my @sorted_numbers = sort { calc($a) <=> calc($b) } @numbers; sub calc [ # いろいろ時間の掛かる処理 }sort ブロック内の calc は何度も呼ばれるので、下記のように値をキャッシングした方が良い。 my @numbers = ( 1 .. 100 ); my @sorted_numbers = map { $_->[0] } sort { $a->[1] <=> $b->[1] } sort { [$_, calc($a)] } @numbers; sub calc [ # いろいろ時間の掛かる処理 }で、これは下記と等価である。