Perl - 特殊变量

---

---

在 Perl 中，有一些变量具有预定义的特殊含义。它们是在通常的变量指示符（$, @ 或 %）之后使用标点符号的变量，例如 $_（如下所述）。

大多数特殊变量都有一个类似英文的长名称，例如，操作系统错误变量 $! 可以写成 $OS_ERROR。但是，如果您要使用类似英文的名称，则需要在程序文件顶部添加一行 use English;。这将指导解释器获取变量的确切含义。

最常用的特殊变量是 $_，它包含默认的输入和模式搜索字符串。例如，在以下几行中：

#!/usr/bin/perl

foreach ('hickory','dickory','doc') {
   print $_;
   print "\n";
}

执行后，将产生以下结果：

hickory
dickory
doc

再次，让我们检查不显式使用 $_ 变量的相同示例：

#!/usr/bin/perl

foreach ('hickory','dickory','doc') {
   print;
   print "\n";
}

执行后，也将产生以下结果：

hickory
dickory
doc

第一次执行循环时，打印“hickory”。第二次打印“dickory”，第三次打印“doc”。这是因为在循环的每次迭代中，当前字符串都放置在 $_ 中，并被 print 默认使用。以下是 Perl 即使您未指定也会假设 $_ 的位置：

• 各种一元函数，包括诸如 ord 和 int 之类的函数，以及所有文件测试（-f，-d），除了 -t，它默认为 STDIN。

• 各种列表函数，如 print 和 unlink。

• 模式匹配操作 m//、s/// 和 tr///，当不用于 =~ 运算符时。

• 如果未提供其他变量，则在 foreach 循环中的默认迭代器变量。

• grep 和 map 函数中的隐式迭代器变量。

• 当行输入操作的结果本身作为 while 测试的唯一条件进行测试时（即，），将输入记录放置的默认位置。请注意，在 while 测试之外，不会发生这种情况。

特殊变量类型

根据特殊变量的使用和性质，我们可以将其分为以下几类：

• 全局标量特殊变量。
• 全局数组特殊变量。
• 全局哈希特殊变量。
• 全局特殊文件句柄。
• 全局特殊常量。
• 正则表达式特殊变量。
• 文件句柄特殊变量。

全局标量特殊变量

以下是所有标量特殊变量的列表。我们列出了相应的类似英文的名称以及符号名称。

全局数组特殊变量

全局哈希特殊变量

全局特殊文件句柄

全局特殊常量

正则表达式特殊变量

文件句柄特殊变量