Perl 中的 $.% 变量128

在 Perl 中，$.% 是一个特殊的变量，用于跟踪当前行号。它可以用来访问当前正在处理的文件行的行号。当循环处理文件时，这非常有用，因为它允许您跟踪文件中的位置。

$.% 变量是一个只读变量，这意味着它不能被重新赋值。它总是包含当前行号，从 1 开始，对于每一行递增 1。当到达文件末尾时，$.% 将包含文件中的最后一行号。

使用方法

要在 Perl 脚本中使用 $.% 变量，您只需将其用作任何其他变量。以下是一些示例：```perl
# 打印当前行号
print "当前行号：$.%";
# 在循环中跟踪行号
foreach $line () {
print "第 $.% 行：$line";
}
# 检查当前行是否为最后一行
if ($.% == -1) {
print "已到达文件末尾";
}
```

与其他变量的关系

$.% 变量与其他 Perl 变量有关。其中一些关系包括：* $_： $_ 变量包含当前正在处理的输入行。因此，您可以使用 $.% 来访问 $_ 行号。
* ARGV： ARGV 数组包含命令行参数。您可以使用 $.% 来跟踪当前正在处理的文件。
* FILENAME： FILENAME 变量包含当前正在处理的文件名。您可以使用 $.% 来跟踪文件中的位置。

例子

以下是一个 Perl 脚本的示例，用于打印文件的前 5 行：```perl
#!/usr/bin/perl
use strict;
use warnings;
my $filename = '';
open(my $fh, '

2025-01-07

上一篇：Perl 语言简介和实用示例

下一篇：Perl (.) 运算符