Question

我正在使用perl文档中的教程，该教程介绍了如何在脚本中使用Getopt::Long。在那里，它展示了如何使用Pod::Usage添加文档，而不是必须在子例程或其他东西中输入所有内容。无论如何在他们的例子中他们有这个;

    GetOptions('help|?' => \$help, 'b|backup' => \&backup, d|discover => \&discover, man => \$man) or pod2usage(2);
pod2usage(1) if $help;
pod2usage(-exitstatus => 0, -verbose => 2) if $man;

我添加了一些自己的论点。

我得到了如何参考文档的第一部分。但是，我如何参考pod2usage(2)所述的第二部分？

当我在第1部分末尾的=cut之后添加一个新部分时，当我尝试显示它时，我遇到了一个命令提示符，就像它进入然后然后没有显示该部分。我做错了吗？

Answer 1

您不需要“多个POD”。

pod2usage，当被称为pod2usage(1)时，此处1代表退出状态，而详细级别隐含为1，因此它将打印SYNOPSIS，并且标题为OPTIONS，ARGUMENTS或OPTIONS AND ARGUMENTS

的任何部分

当调用pod2usage(-exitval => 0, -verbose => 2)时，它会在您的文本寻呼机中打印整个POD（与perldoc yourscriptname.pl将要执行的操作相同），然后退出0。（注意它是-exitval而不是-exitstatus）。

Pod::Usage文档here中对此进行了详细介绍，其工作原理与此相同。

您可以找到-sections的可选pod2usage参数，该参数对您所描述的内容非常有用，并与-verbose => 1结合使用，可以选择您想要显示的内容。

如何在perl脚本的末尾添加多个POD？

1 个答案: