У меня есть существующий сценарий Perl, в котором есть много параметров командной строки, которые обрабатываются с использованием Getopt::Std
(функция getopts
). Но я хочу добавить 2 новые опции: --testrun
и --cfgarray
.
Я использовал use Getopt::Long;
и GetOptions('testrun' => \$test_flag);
"--testrun" не принимает аргументов. Я просто использовал его как флаг, например if($test_flag)
. Работает при отдельном запуске. Но так как в моем Perl-скрипте есть и use Getopt::Long;
, и use Getopt::Std;
, я получаю сообщение об ошибке:
неизвестные варианты
из getopts
API (когда он вызывается до GetOptions
). Можно ли использовать и Getopt::Std
, и Getopt::Long
в одном Perl-скрипте?