Perl中的 $# $@ $127

在Perl编程语言中，$#、$@和$是三个预定义的特殊变量，它们在处理数组、异常和当前输入行时非常有用。

1. $#：数组中的最后一个索引

$#变量存储了一个数组的最后一个索引。对于一个标量，它返回-1。例如：```perl
my @array = (1, 2, 3, 4);
print "Last index: $#\array"; # 输出：3
```

2. $@：异常信息

$@变量存储了最近发生的异常信息。当一个异常被抛出时，它会自动包含异常的详细信息。例如：```perl
eval {
die "Error occurred";
};
if ($@) {
print "Error: $@"; # 输出：Error: Error occurred
}
```

3. $：当前输入行

$变量存储了当前输入行的内容。当使用读入操作符（如）从标准输入读取时，它会自动更新。例如：```perl
print "Enter your name: ";
my $name = ;
print "Your name is $name";
```

4. 使用示例

这三个变量经常一起使用来处理数组、异常和输入。例如，以下代码段演示如何使用这些变量来打印一个数组中所有元素以及其索引：```perl
my @array = (1, 2, 3, 4);
for (my $i = 0; $i

2025-01-07

上一篇：如何使用 perl $/=> 设定输入记录分隔符

下一篇：Perl 中的 @_: 解析列表上下文