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

Question

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

=head1 概要

foo [选项]... [URL]...

=head1 选项

=超过20

=项目 B<-h, --help>

打印简短的帮助信息并退出。

=项目B<-i，--输入=文件>

从 FILE 读取

=返回

=切

当我提供 -h 它会产生：

用法：
    foo [选项]... [URL]...

选项：
    -h, --help 打印简短的帮助信息并退出。

    -i, --input=FILE 从 FILE 读取

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

Answer 1

Pod::Usage只需调用类似perldoc或的 Pod 格式化程序Text::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 或类似的东西看起来很好。