如何在 Perl 中输入多行注释?

可能的复制品:
Perl 中多行注释的常见解决方案是什么?

如何向 Perl 源代码添加多行注释?

313246 次浏览

Perl 有多行注释:

#!/usr/bin/perl


use strict;


use warnings;


=for comment


Example of multiline comment.


Example of multiline comment.


=cut


print "Multi Line Comment Example \n";
POD is the official way to do multi line comments in Perl,
  • 请参阅 < strong > < a href = “ http://www.perlmonks.org/? node _ id = 560985”rel = “ noReferrer”> perl 中的多行注释 代码 及
  • 在 Perl 中创建多行注释的更好方法 细节。

来自 faq.perl.org [ Perlfaq7]

将多行 Perl 注释掉的快捷方式是 用 Pod 指令包围这些行,你必须把这些 指令放在行的开头,并且在 Perl 期望一个新的语句(所以不要在语句的中间,比如 # 以 =cut结束注释,以 Pod 部分结束:

=pod


my $object = NotGonnaHappen->new();


ignored_sub();


$wont_be_assigned = 37;


=cut

只有在你不打算这么做的时候,这种快速而肮脏的方法才会奏效 将注释代码保留在源代码中, 你的多行注释将会出现在 Pod 翻译中 更好的方法也可以向 Pod 解析器隐藏它。

=begin指令可以为特定用途标记节 Pod 解析器不想处理它,它只是忽略它 使用 =end结束注释,使用 返回到 Perl 代码仍然需要 =cut 播客评论:

=begin comment


my $object = NotGonnaHappen->new();


ignored_sub();


$wont_be_assigned = 37;


=end comment


=cut