Perlスクリプトhogging CPU

Question

私はいくつかのスクリプトのインスタンスを実行していますが、すべて正常に動作します。 私がロードする各端末はCPUを高くします。

私は12のインスタンスを実行し、デュアルコアCPUの99％を抑制しています。 私はRAM 8GBのDDR3を完全に積み重ねました。 プロジェクト中のある時点で、私はmysqlを使用しましたが、重いボトルネックがあり、いくつかのランダムな切断エラーがありました（グーグルが私にNICと言えると言いました）。

とにかく...ディスクへの書き込みはシェルからずっと速くなりました。 使用されるモジュールはWWWです：Mechanize

ただし、インスタンスごとに、プロファイルはひどいものではありません。 24％までバウンスします。しかし、私は8または9のターミナルウィンドウを実行して100％の負荷まで実行に限界に達しています。おそらく、帯域幅の結果であり、ちょうどダウンロード時間です。何キロバイト後にダウンロードを停止するとしますか？

おかげで、 ピーター

Answer 1

は、残念ながら、私はそのようにperlインタプリタの挙動に影響を与える方法があるとは思いません。あなたのボックスにあるすべてのperlスクリプトのCPUリミットを設定することができますが、私が知る限りperlで行う方法はありません。インタープリタはすべてのメモリ割り当てなどを独自に管理しています。

あなたは、このリンクをチェックアウトすることができます：それは間違いなく19回のインタプリタを実行し、より効率的になるようHow to limit CPU usage in perl

また、あなたは、perlのスレッドに見てみたいことがあります。

Answer 2

しかし、私はそれは、帯域幅の結果 で、時間だけをダウンロード..ほとんどのランニング 8つのまたは9ターミナルウィンドウで 100％負荷に実行するには限界に達した。..

ウム...帯域幅の制約/ダウンロード時間のために壁に衝突した場合、プロセスはI/O（プロセス状態D：top/ps）でブロックされ、事実上スリープ状態になり、 I/O要求が完了するまで

あなたの現在の問題は、あなたのコードが何をしているかについての詳細な説明なしでは理想的ではありませんが、アルゴリズムの一般的な説明で十分でしょう。

8または9個のプロセスを実行している場合、1つのインスタンスが平均11-12％のCPU使用率を平均した場合、CPUを100％でペグすることが保証されます。あなたはプロセスあたりの平均CPU消費量について何も言っていませんが、定期的に最大24％までバウンスすると、その半分以上の平均があることに驚くことはありません。