0

我正在使用 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)？

当我=cut在第 1 部分的末尾添加一个新部分时，当我尝试让它显示它时，我会遇到一个命令提示符，就像它在没有显示该部分的情况下进入然后退出一样。难道我做错了什么？

4

1 回答 1

3

您不需要“多个 POD”。

pod2usage, 当调用时, 例如,pod2usage(1)这里 1 表示退出状态, 详细级别隐含为 1, 所以它将打印SYNOPSIS, 和任何标题为OPTIONS,ARGUMENTS或OPTIONS AND ARGUMENTS

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

它在此处Pod::Usage的文档中得到了很好的描述，并且按照描述的方式工作。

您可能会发现可选-sections参数对pod2usage您所描述的内容非常有用，与 , 结合使用-verbose => 1可以选择您希望显示的内容。

于 2011-01-20T05:34:08.347 回答