鈍足ランナーのIT日記

走るのが好きな5流のITエンジニアのブログ。

趣味の範囲は広いけど、どれも中途半端なクソブロガー楽しめるWebアプリを作ってあっと言わせたい。サーバーサイドPerl(Mojolicious)、クライアントサイドVue.js。Arduinoにも触手を伸ばす予定。

2013-08-22から1日間の記事一覧

perlで配列の検索を高速化したい

配列内に要素があるかないか判定したい。 でも頭から検索しにいくから 後にある検索は遅くなってしまう。 use strict; use warnings; use List::Util qw/first/; use Benchmark qw/timethese cmpthese/; my @ids = (0 .. 1000000); timethese(1000,{ first =…