我怎样才能摆脱 Perl 的 Pod 的空行，这样它们就不会出现在 Pod::Usage 中？

Question

我有以下与 getopt::long 一起使用的 pod：

=head1 SYNOPSIS

foo [OPTION]... [URL]...

=head1 OPTIONS

=over 20

=item B<-h, --help>

Print a brief help message and exits.

=item B<-i, --input=FILE>

Reads from FILE

=back

=cut

当我提供 -h 时，它会产生：

Usage:
    foo [OPTION]... [URL]...

Options:
    -h, --help          Print a brief help message and exits.

    -i, --input=FILE    Reads from FILE

我的问题是：如何删除 -h 和 -i 之间的空行？

Answer 1

Pod::Usage只是调用像perldoc或Text::Pod这样的 Pod 格式化程序来从你的 Pod 生成使用信息。 您编写的 Pod 代码将被这些工具格式化为几个空行。 如果您不想要这些，请编写不同的 Pod。 例如

=over 4

=item B<-h>                     Print a brief help message and exits.

=item B<-i>, B<--input=FILE>    Reads from FILE

=back

不幸的是，当转换为其他格式（例如 HTML）时，这看起来不太好，并且您将失去选项及其描述的良好垂直对齐方式。 但是，由于Pod::Usage确实是为命令行程序设计的，因此优化终端上文本的可读性似乎是合理的，而不是让内容在 HTML 或类似内容中看起来不错。