Perl GetOptions () чувствительность к регистру

Question

GetOptions(
    "r|repo=s"       =>   \$repo,
    "R|list-repos"   =>   \$list,
);

Когда я вызываю этот сценарий с параметром -r qwe, $list обновляется до 1, что не соответствует ожиданиям.

Как сделать GetOpt чувствительным к регистру?

Answer 1

use Getopt::Long qw(:config no_ignore_case);

Answer 2

Кроме того, включение пакетирования исправляет и это:

use Getopt::Long  qw(:config bundling);