cooldaemon https://blog.hatena.ne.jp/cooldaemon/ cooldaemonの備忘録 https://cooldaemon.hatenadiary.org/ Perl Memoize 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 … 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fcooldaemon.hatenadiary.org%2Fentry%2F20060313%2F1142215135" title="使い方 - cooldaemonの備忘録" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2006-03-13 10:58:55 rich https://cooldaemon.hatenadiary.org/entry/20060313/1142215135 1.0 100%