404 Blog Not Found:perl - use List::Util; # for production codes 呼び出しているモジュールのソースコードを 直接呼んでみたが実行速度は桁違いに遅い。 ビルトイン呼び出し>ビルトインの一部呼び出し>全部ソースコード の順。 はっきり言ってPerlで書いてある段階で十分遅い。 早くしたいならCで書いてPerlに組み込んで 最低限の呼び出しだけPerlで行えということかと。 Perlで書いてある時点で速度がかなりロスになる、そのロスになったPerlで速度を出そうと言うことがかなり徒労に感じる。 #!/usr/local/bin/perl use strict; use warnings; use Benchmark qw/timethese cmpthese/; use List::Util (); my $max = shift