perl - 如何管理用 Perl 编写的脚本的命令行参数/变量？

Question

我正在尝试管理用户在执行命令时指定的大量参数。到目前为止，我一直在尝试将我的脚本设计限制为将参数作为可以使用 Getopt::Long 轻松管理的标志来管理，如下所示:

GetOptions ("a" => \$a, "b" => \$b);

通过这种方式，我可以检查是否指定了 a 或 b，然后执行相应的代码/函数。

但是，我现在有一个案例，用户可以指定两个参数变量，如下所示:

command -a black -b white

这很好，但我想不出一个好的方法来确定是先指定 -a 还是 -b。因此，我不知道在执行 GetOptions ("a"= >\$a, "b"=>\$b);.

在上面的示例中，我如何知道哪个变量与 -a 相关联，哪个与 -b 相关联？

Answer 1

Getopt 支持选项的参数，所以你可以说例如:

GetOptions( 'a=s' => \$a, 'b=s' => \$b);
print "a is $a and b is $b";

在您的问题打印中使用命令行:

a is black and b is white

见 manual page更多选择。这是一个非常强大的模块。