Perl Getopt Настройка проблем - PullRequest
Новая
       10

Perl Getopt Настройка проблем

0 голосов
/ 27 августа 2010 
#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

1 Ответ

1 голос
/ 27 августа 2010

Хотя bundling, очевидно, замедляет начальную обработку (поскольку теперь вам нужно проанализировать строку аргумента для различного сочетания подстрок), вы, похоже, получаете не более 4% системного времени и 1% пользовательского времени для пустого скрипта .По сравнению со стоимостью на самом деле запуска сценария, это не должно быть ужасно значительным.Я признаю, что не уверен в изменениях в реальном времени - они не кажутся слишком коррелированными - может ли это быть связано с некоторыми другими факторами?

...