perl - Perl 在运行时以编程方式修改 POD

Question

我为我正在处理的一些脚本编写了一个便利库。Getopt::Long除了提供强制性参数外，它还包含一些更简单的东西。因此，该库将许多参数添加到脚本的必需/可能的命令行参数列表中。

由于脚本还在--help标志上调用 pod2usage，我希望库以某种方式提供它提供给单个脚本的每个标志的定义，因此可以在调用 pod2usage 时呈现它。

例如，--dosomething我的库添加了一个标志，无论如何，当我运行时a.pl --help，它将包括由 提供的帮助定义a.pl，以及由库提供的定义，就像那些--dosomething可能a.pl不知道的定义一样？

有没有办法做到这一点——让一个库在运行时修改脚本的 POD？

Answer 1

不幸pod2usage的是，对于这个目的来说太静态了。您可能会查看App::Cmd或Getopt::Long::Descriptive（由 App::Cmd 使用）以获得更接近此的一些功能。

也就是说，您不需要使用 pod2usage 来打印使用语句，它只是转储脚本自己的 pod 的一种有用方法。