Perl中的单行注释和多行注释语法

1. 单行注释

使用 # 符号：

# 这是单行注释
my $name = "John";  # 这也是单行注释（行内注释）

2. 多行注释

Perl 没有专门的多行注释语法，但有以下几种替代方式：

方法1：使用多个单行注释

# 这是多行注释
# 的第二行
# 的第三行
my $var = 1;

方法2：使用 POD 文档（最常用）

=begin comment
这是多行注释
可以跨越多行
=end comment
=cut

my $var = 2;

或者更简洁的写法：

=pod
这是注释
多行内容
=cut

my $var = 3;

方法3：使用 HERE 文档（较少用）

<<'COMMENT';
这是多行注释
但这不是真正的注释
实际上创建了一个字符串
只是不赋值给变量
COMMENT

my $var = 4;

方法4：使用条件语句（巧妙方式）

if (0) {
    # 这些代码不会执行
    print "这不会打印";
    $unused = "这不会被赋值";
}

注意事项：

POD 文档是最常用的多行注释方式，尤其是在模块和脚本中 Perl 中没有像 C/C++ 的 /* */ 或多重注释语法 POD 注释必须以 =cut 结束，否则会报错 POD 不仅可以用于注释，还是 Perl 的标准文档格式

示例比较：

#!/usr/bin/perl
use strict;
use warnings;

# 单行注释
my $x = 10;  # 变量 x 赋值为 10

=pod
多行注释示例：
这个程序演示了
Perl 的注释用法
=cut

# 实际代码从这里开始
print "Hello, World!\n";