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。