perl 多行注释

=pod
codes to comment
=cut

注意：pod is short for Plain Old Documentations. =pod =cut只能在行首. pod只是一个符号，可以换成其他字符

如果您用了一大块 pod 来描述你的代码，那么请尽量不要将其放在文件的上面或中间部分。虽然 perl 分析器能很快的跳过 pod ，但是这不是魔法，它还是需要一点时间的。它还是需要从磁盘中读入它，并且读入的目的仅仅是忽略它。将所有的pod放到__END__后面，那样 Perl 编译器就不会去注意它。

http://bbs./thread-1157830-1-1.html

刚在一篇博客上看的如下内容：
成段注释：

1、=cut; ......; =cut;

2、=head; ......; =cut;

3、<< TXT; ......; TXT

4、# 单行注释

---------------------------------------------------------------

具体测试了一下，结果如下：

#!/usr/bin/perl -w

use strict;

my $a = 0;

=pod          #ok
$a = aaa;
=cut

=head         #ok
$a = bbb;
=cut

#<<TXT
#$a = ccc;  //此种方法不行
#TXT
#

=abc          #ok
$a = ddd;
=abc

=abc          #ok
$a = ddd;
=cut           #很奇怪将这个cut换成abc就无输出结果

print "$a\n";

 

1. <<TXT
   
2. $a = ccc;  //此种方法不行
   
3. TXT

复制代码

这个是可以的  你写错了


正确的如下：

1. print "aaa\n";
   
2. 
   
3. <<TXT;
   
4. $a = ccc;
   
5. TXT
   
6. 
   
7. print "bbbb\n";

复制代码

cut省略的话，默认到最后一行均为注释，cut不是必需的。

 

 

<<END;
...
END

=xxx
...
=cut