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

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

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

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

10
задан mateusza 23 March 2011 в 16:17
поделиться