如何在 Perl 中输入多行注释？ [复制]

Posted 2023-02-21

【中文标题】如何在 Perl 中输入多行注释？ [复制]

【英文标题】：How do I enter a multi-line comment in Perl? [duplicate]

【发布时间】：2011-04-19 04:44:13

【问题描述】：

可能重复：What are the common workarounds for multi-line comments in Perl?

如何在 Perl 源代码中添加多行注释？

【问题讨论】：

只需做 =head ##你的代码来注释 =cut

【参考方案1】：

POD is the official way to do multi line comments in Perl,

见

Multi-line comments in perl code

和

Better ways to make multi-line comments in Perl

了解更多 详细。

来自 faq.perl.org[perlfaq7]

How can I comment out a large block of Perl code?

注释掉多行 Perl 的快速而简单的方法是 用 Pod 指令包围这些行。你必须把这些 在行首和 Perl 的某处的指令 需要一个新的语句（所以不在像 # 这样的语句中间 厘米）。您以 =cut 结束评论，结束 Pod 部分：

=pod

my $object = NotGonnaHappen->new();

ignored_sub();

$wont_be_assigned = 37;

=cut

只有当你不打算这样做时，这种快速而肮脏的方法才有效 将注释代码留在源代码中。如果出现 Pod 解析器， 您的多行注释将显示在 Pod 翻译中。一种 更好的方法也将其从 Pod 解析器中隐藏起来。

=begin 指令可以为特定目的标记一个部分。如果 Pod 解析器不想处理它，它只是忽略它。标签 带有comment 的 cmets。使用 =end 结束评论 相同的标签。您仍然需要 =cut 从 播客评论：

=begin comment

my $object = NotGonnaHappen->new();

ignored_sub();

$wont_be_assigned = 37;

=end comment

=cut

【讨论】：

注释不必以 =POD 开头，你可以使用任何东西来开始切

【参考方案2】：

我找到了。 Perl 有多行 cmets：

#!/usr/bin/perl

use strict;

use warnings;

=for comment

Example of multiline comment.

Example of multiline comment.

=cut

print "Multi Line Comment Example \n";

【讨论】：

在=for comment 和=cut 之间，从第二段开始，它将显示在perldoc 中。所以只有第一段会从代码和 perldoc 中得到完整的注释。如果应该避免这种情况，请使用=begin comment ...multi-lines/paragraph cmets...=end comment (*new-line*) =cut。