perl - 选项规范中未定义的参数

Question

我正在我的开放 suse 操作系统中通过 komodo ide 编写 perl 代码。

在命令行中我通过：

--verbose --verbose -v --more --lib='/lib' -l '/lib64' -f a=1 --flag b=2  --debug 2 -t fukai

到我的具有以下代码的脚本：

use Getopt::Long;
use Smart::Comments;

my @libs = ();
my %flags = ();
my ($verbose, $all, $more, $diam, $debug, $test, $step);

GetOptions(
   'verbose+' => \$verbose,
   'more!' => \$more,
   'debug:i' => \$debug,
   'lib=s' => \@libs,
   'flag=s' => \%flags,
   'test|t' => \$test,
   'all|everything|universe' => $all
);
    
### $verbose
### $more
### $debug
### $test
### @libs;
### %flags

我得到错误：

Undefined argument in option spec

标签： perl

Answer 1

'all|everything|universe' => $all

应该

'all|everything|universe' => \$all