Perl GetOptions 函数

Question

我的 Perl 脚本以以下方式检索参数。有 Getoptions 函数来检索命令行参数。

./test.pl  -mode report -writeid 12 13 23......

$rc=GetOptions( 'mode=s' => \$cmdParams{mode}
           ,'writeid:i{1,}' => \@writeid
           ,'h|?|help'  => \$help
          );

问题是当我在 writeid 选项中有字母数字字符时，它没有失败。 Writeid 定义为整数 (i{1,})，它可以接收 1 到多个值。当我在第二个值中有字母数字字符时，它不会失败。 ./test.pl -mode report -writeid 12 A3 23......

我能做的解决方法是什么？

Answer 1

当您使用 GetOptions 函数时，我假设您使用的是 GetOpts::Long，选项规范中的“{1,}”一个或多个数量的问题在于，一旦您成功匹配了一个整数，您已经“成功”了。如果您删除了量化规范并仅使用 'writeid:i' => \@writeid 运行，则每个 write_id 必须在命令行上以标志开头，因此当它无法解析时您将获得错误状态。