0 
#test.pl

use Getopt::Long;
Getopt::Long::Configure ("bundling");

GetOptions ( 'TestB|B|b' => \$testb ,
             'TestA|A|a' => \$testa, );

これが私の状況ですperl test.pl -Ba

だから私は使用しますGetopt::Long::Configure ("bundling");

このため、オプションを使用して実行しようとしても、プログラムは最初は遅くなります perl test.pl

これを愛する最良の方法はありますか？

ベンチマーク結果：

with Getopt::Long::Configure ("bundling");

real    0m6.101s
user    0m2.040s
sys     0m0.260s

Without Getopt::Long::Configure ("bundling");

real    0m3.019s
user    0m2.020s
sys     0m0.200s
4

1 に答える 1

1

初期処理はbundling明らかに遅くなりますが（サブ文字列のさまざまな組み合わせについて引数文字列を解析する必要があるため）、空のスクリプトでは最大で4％のシステム時間と1％のユーザー時間の増加が発生するようです。スクリプトを実際に実行するコストと比較すると、それほど重要ではないはずです。リアルタイムの変更についてはよくわかりませんが、相関関係があまりないようですが、これは他の要因が原因である可能性がありますか？

于 2010-08-27T15:39:42.067 に答える