perl 多行注释

示例如下：

#!/usr/bin/perl -w

use strict;

my ($a, $b, $c, $d, $e) = (1..5);

=pod

$a = 0;

=cut

=head

$b = 0;

=cut

<

$c = 0;

TXT

=random

$d = 0;

=cut

=cut

$e = 0;

=cut

print "\$a = $a\n";

print "\$b = $b\n";

print "\$c = $c\n";

print "\$d = $d\n";

print "\$e = $e\n";

#注意，此处应用会注释到结尾，因为没有使用=cut结束注释

=random#任意字符

$e =0;

=random

print "--------------\n";

print "\$a = $a\n";

print "\$b = $b\n";

print "\$c = $c\n";

print "\$d = $d\n";

print "\$e = $e\n";

用法描述：

关键字是

=任意字

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/27042095/viewspace-752541/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/27042095/viewspace-752541/